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IDENTIFICATION 


PRODUCT CODE: AC -T8S3C-MC 

PRODUCT NAME: COKDACO KDJ11-8 CLUSTER DIAG. 
PRODUCT DATE: AAT, 1964 

MAINTAINER: OIAGNMISTIC ENGINEERING 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT T0 
MO SHOUD NOT COMSTRUED AS A COMMITMENT BY DIGITAL 
CORPORATION ASSUMES NO 


NOTICE BE 
TION. OIGITAL EQUIPMENT 


CHANGE WITHOUT 


E CORPORA 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THI 


NO RESPONSIBILITY IS ASSUMED FOR THE USE OR 
SOFTWARE ON EQUIPHENT THAT IS NOT SUPPLIED BY 
AFFILIATED COMPANIES. 


RELIABILITY OF 
OIGITA OR ITS 


COPYRIGHT (C) 1964 BY DIGITA EQUIPMENT CORPORATION 


THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION: 


DIGITAL POP UNIBUS 
DEC DECUS DEC TAPE 


MASSBUS 


SEQ 0001 


COKDACO KDU11-8 CLUSTER DIAG. 
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1. PROGRAM ABSTRACT 


eeee §=©6SEE SPECIAL INSTRUCTIONS FOR CACHE TESTING UNDER APT, eons 
eeee §=60SECTION 9.2, AND EEROM TESTING UNDER APT, SECTION 9.3 osee 


THIS PROGRAM TESTS OUT KDJ11-6 CPU BOARD, INCLUDING THE J11 CHIP SET, 
ON-BOARD CACHE, ON-BOARD ROM'S, INCLUDING 16 BIT AND THE 6 BIT EEROM, 
SERIAL LINE UNIT, AND LINE TIME CLOCKS. 


THE a IS A POP-11 CPU THAT INCORPORATES THE J11 CHIP SET AS THE 
HEART OF THE PROCESSCR. IT IS A QUAD HEIGHT G22 BUS MODULE. IT HAS 
ON-BOARD CACHE, SOME OF THE FUNCTIONALITY OF THE CACHE IS HIDDEN INSIDE 
THE Jil a THE REST OF THE FUNCTIONS IMPLEMENTED IN TWO or cea 


ARRAYS STORAGE CAPACITY OF THE CACHE IS 4K BYTES OF RAM, ED 
DATA RAM'S. THE CACHE IS IMPLEMENTED AS A DIRECT MAPPED CACHE WITH 
ADDRESS BITS 21 THROUGH 135 STORED IN A DIFFERENT SET OF RAMS CALLED 


TAG STORE. 
THE KDJ11-8 ALSO HAS TWO ON-BOARD ROM’S. ONE OF THEM, THE 16-817 
ADDRESSABLE ROM, CONTAINS THE SELF-TEST AMD THE BOOT CODES. THE OTHER 
ROM, THE 8-BIT ADDRESSABLE ONE, CONTAINS THE BASE AREA WITH HARDWARE 
SELECTION PARAMETERS, OPTIONAL BOOTSTRAPS, OPTIONAL UFD (USER FRIENDLY 
— SYSTEM DESCTIPTION AREA, AND OPTIONAL FOREIGN LANGUAGE 
THE SERIAL LINE UNIT IS IMPLEMENTED THRU A DLART CHIP WHICH PROVIDES 
THE STANDARD CONSOLE INTERFACE TO THE CPU. IT WAS INTERNAL LOOP BACK 
MODE AND PROVIDES WITH THREE CLOCK LINES: SOOHZ, 60HZ, AND SOHZ. 
THE LINE TIME CLOCK FUNCTIONS ARE IMPLEMENTED USING THOSE THREE LINES 
AND THE BEVENT LINE. THE LINE CLOCK STATUS REGISTER IS IMPLEMENTED IN 
ONE OF THE GATE ARRAYS. 
2. SYSTEM REQUIREMENTS 
HARDWARE REQUIREMENTS 
TO RUN SUCCESSFULLY THE DIAGNOSTIC NEEDS: 

1. KDJ11-8 CP MODULE 

2. CONSOLE TERMINAL 

3. AT LEAST 26K OF MEMORY 
IN DVT, AND STAGE ONE MANUFACTURING (MODLLE ASSEMBLY) THE Q22 BUS 
EXERCISER IS NEEDED TO CHECK Q22 BUS LOGIC. 
3. LOADING AND STARTING PROCEDURES 
TO START-UP THIS PROGRAM: 

1. BOOT XXDP. 


2. TYPE “R NAME” — THE NAME OF THE BIN OR BIC 
FILE FOR THIS PROGRAM 


THE STARTING ADORESS OF THE PROGRAM IS 200. 


SEQ 0003 
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SEQ 0004 
133 NOTE: IF TRYING TO RESTART THE PROGRAM IN AN ARBITRARY PLACE AFTER | 
13a HALT ON BREAK THE FOLLOWING REGISTERS SHOULD BE SET UP: | 
135 177775720 TO DISABLE MEMMORY MANAGEMENT 
136 177775201000 TO CLEAR DIAGNOSTIC MODE (BIT 8). BUT STILL SAVE 
137 
138 17777746*400 TO FLUSH THE CACHE 
139 
140 
141 4. SPECIAL ENVIRONMENTS | 
142 
143 THE PROGRAM IS APT COMPATIBLE. IT CAN ALSO BE RUN UNDER THE UFD_ HONITOR. 
144 IN THOSE CASES NONE OF THE STANDARD ERROR PRINTOUTS OCCUR. REFER 
145 TO CORRESPONDING DOCUMENTS ON RUNNING PROCEDURES IN APT AND UNDER 
146 UFD MONITOR. 
14 
148 eeee SEE SPECIAL IASTRUCTIONS FOR CACHE TESTING UNDER APT, = sane 
149 ; eee SECTION 9.2, AND EEROM TESTING UNDER APT, SECTION 9.3 sees 
1 
151 5S. PROGRAM OPTIONS 
153 THE 22 BUS EXERCISER IS UTILIZED IF IT IS PRESENT IN THE SYSTEM AND 
154 THE DIAGNOSTIC IS NOT RUNNING IN UFD MODE. 
155 STANDARD CAPABILITIES OF LOOPING ON TEST AND ON ERROR ARE PROVIDED. 
156 IN ORDER TO RUN THE EXTENSIVE CACHE DATA RAM TEST BIT 7 HAS TO BE SET 
157 IN THE SOFTWARE SWITCH REGISTER. TO RUN THE EXTENSIVE CACHE TAG RAM TEST 
138 BIT 6 HAS TO BE SET IN THE SOFTWARE SWITCH REGISTER. 
160 
161 SWITCH REGISTER SELECTION: 
162 BIT NUMBER USE 
163 15 HALT ON ERROR 
164 14 LOOP ON PRESENT TEST 
165 13 INHIBIT ERROR TYPEOUTS 
166 ees = 12 EEROM SUBTEST RUN SWITCH 
167 11 INHIBIT ITERATIONS 
168 10 BELL ON ERROR 
169 9 LOOP ON ERROR 
170 rf LOOP ON TEST IN SWR<S-0> 
171 ? DO EXTENSIVE DATA RAM TEST 
172 & DO EXTENSIVE TAG RAM TEST 
173 5-0 SUBTEST NUMBER TO LOOP ON (BIT 8) 
175 see RUMMING WITH THIS TEST MILL CHANGE ALL BUT THE FIRST 109 BYTES OF 
176 EEROM DATA! BE SURE TO READ INSTRUCTIONS IN SECT. 9.3 
179 6. EXECUTION TIMES 
180 WITHOUT EXTENSIVE RAM TESTS, THE DIAGNOSTIC RUNS IN UNDER 15 SECONDS. 
181 WITH THEM, IT TAKES ABOUT 2 MINU 
183 IN ADDITION. WHEN THE EEROM TEST BIT IS ON, PASS 1 TAKES AN ADDITIONAL 
164 AMOUNT OF TIME OF 1 MINUTE FOR 1SMHZ J-11, TO ABOUT 40 SEC. FOR THE 
185 20MHZ. VERSION. THESE TEST TIMES ARE FOR THE 2K EEROM, FOR OK PARTS, 
186 MULTIPLY BY 4. | IF RUNNING UNDER APT, THE SYSTEM MANAGER MUST BE SURE 
187 THE FIRST PASS RUN TIME ALLOWS ADEQUATE TIME FOR COMPLETION OF THIS TEST! 


189 7, ERROR INFORMATION 


Fi 
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SEQ 0005 

190 
191 IN THE CASE OF ERRORS, A FAILING PC AND TEST NUMBERS ARE GIVEN. 
192 WHERE IT IS POSSIBLE, EXPECTED AND RECEIVED DATA ARE GIVEN. 
193 FOR AN EXAMPLE, SEE SECTION 8. 
194 
195 8. EXAMPLES 
196 
197 AFTER BOOTING XXDP+ AND STARTING THE PROGRAM, THE FOLLOWING 
198 WILL APPEAR ON THE TERMINAL : 
199 
on KDJ11-8 CPU DIAGNOSTIC 

1 
202 SWR = XXXXXX NEW = 
203 
oe ee CORRESPOND TO PRESENT SOFTWARE SWITCH REGISTER 
206 AFTER “NEW” AN OPERATOR CAN DO ONE OF THE FOLLOWING: 
207 1) TYPE IN A NEW SOFTWARE SWITCH REGISTER SETTING FOLLOWED 
208 BY CARRIGE RETURN OR 
209 2) JUST TYPE IN CARRIAGE RETURN IN WHICH CASE THE SOFTWARE 
ey REGISTER WILL REMAIN UNCHANGED. 
212 EXAMPLE OF ERROR PRINTOUT: 
213 ERROR IN TAG STORE 
214 TEST ERROR ADORESS ADDRESS 
215 € PC <21-16> <15-0> 
216 27 105620 66600 000000 
4 NOTE: THIS MAY NOT CORRESPOND TO THE ACTUAL PROGRAM COUNTER. 
219 
220 
221 9. PROGRAM DESCRIPTION 
222 
223 
224 9.1 J11 CODE 
225 THIS PORTION OF THE CODE TESTS OUT THE J11 CHIP SET. IT IS BROKEN 
226 INTO 3 PIECES: CPU TESTS, + yk. VERIFY DIFFERENT INSTRUCTIONS IN 
227 DIFFERENT MODES AND DIFFERENT TRAP CONDITIONS; MMU TESTS, WHICH 
228 VERIFY DIFFERENT FUNCTIONS OF MMU; AND FFP TESTS, WHICH 00 
229 DIFFERENT FLOATING POINT INSTRUCTIONS. 
230 THIS PORTION OF THE CODE HAVE BEEN WRITTEN IN CLOSE RELATIONSHIP 
231 WITH THE Jil MICROCODE. THEREFORE, EVEN THOUGH NOT ALL POSSIBLE 
232 INSTRUCTIONS IN ALL POSSIBLE ADORESSING MODE HAVE BEEN TESTED, AN 
bs ATTEMPT HAS BEEN MADE TO EXERCISE ALL OF THE MICROCODE. 
235 
2% 9.2 CACHE CODE 
237 THIS PORTION OF THE DIAGNOSTIC VERIFIES ALL CACHE FUNCTIONS. 
oo DATA AND TAG RAM’S TESTS ARE ALSO INCLUDED. 
240 COCSSSSSESSSESESOEESSSESSSSSSSSESESSSESSSESEEESEESSESSEESEEESEEESESEEEEESESES 
241 NOTE: IN ORDER TO RUN EXTENSIVE CACHE RAM'S TESTS THE CORRESPONDING 
242 BITS IN THE SOFTWARE SWITCH REGISTER SHOULD BE SET. SEE SECTION 5 
243 ----IN PARTICULAR, THE $ SWARE REG #2) SHOULD EQUAL 
4h THE “FIRST PASS RUN TIME” SET UP AT INSTALLATION---- (THE EXCEPTION 
245 IS WHEN ¢USWR IS SET TO ZERO, NO CONDITION APPLIES) 


246 SSSOSSSSESSSSSESSSSSSEHSSESSSSESSHESSESESSSHSSHESSHSSSSSSHSSEHSSSESSHSSESSESSSESSSESSESHESEESE 
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SEQ 0006 
247 
248 TESTING CACHE FUNCTIONS UNDER APT 
249 
250 _ THE TESTING OF CACHE RELATED FUNCTIONS UNDER APT IS FACILITATED 
251 BY USE OF SUSWR CONTAINING A NUMBER WHICH WILL INDICATE THE NUMBER 
252 OF PASSES WITH INCLUSIVE CACHE TESTS AS FOLLOWS: 
253 
254 CALL NUMBERS IN DECIMAL, $USWR LOADED BY APT MANAGER ) 
255 
256 ONE PASS WITH ALL SUBTESTS FOLLOWED BY 
257 DEF AULT $USWR = 0 CONTINUOUS TESTING OF NON-CACHE DEPENDENT 
2s¢ SETTING SUBTESTS UNTIL APT BREAK IS ENCOUNTERED 
259 CAPT SYSTEM MUST NOT BREAK IN FOR THIS 
260 “FIRST PASS RUN TIME”, NOW ASSUMED TO BE 
261 APPROX 16 SEC. ) 
263 
264 SUSUR < 16 ONLY NON-CACHE eat TESTS WILL BE RUN 
265 APT MAY BREAK ANYTI 
266 
4 $USWR = 16 SAME AS SUSUR = 0 
269 $USWR > 16 SUSWR IS DIVIDED BY 16 (PASS TIME ) 10 GET A 
270 NUMBER OF PASSES WHICH INCLUDE ALL SUBTESTS 
271 C INCL ) AFTER THIS NUMBER OF PASSES, 
272 ONTINUOUS TESTING WITH ONLY NON-C - 
273 ENT SUB-TESTS IS CONTINUED ING WHICH TIME 
iad APT MAY BREAK WITH NO BAD EFFECTS. 
276 IN THIS CASE, THE APT SETUP MUST NOT ATTEMPT TO --k FOR A LENGTH OF TIME | 
277 EQUAL TO $USWR CONTENTS. IN SECONDS. THE NOMINAL 16 SECONDS PER PASS, AND THE 
278 ACTUAL PASS TIME OF ABOUT 10 SECONDS (WHICH CHANGES AS TESTS MAY BE ADDED) 
279 ALLOW A SAFTY MARGIN ADDING ADDITIONAL TESTS. THE ACTUAL NUMBER OF PASSES DONE 
4 WILL BE EQUAL TO $USWR DIVIDED BY 16, CIF NOT 0, OR < 16 ). 
382 ssessesssesss 
283 eeeee THE GUARRANTEE THAT APT WILL NOT ATTEMPT TO BREAK INTO THE DIAGNOSTIC 
264 FOR A GIVEN NUMBER OF SECONDS IS PROVIDED BY THE APT SYSTEM MANAGER LOADING 
265 THE VARIABLE $PASTM WITH THE SAME NUMBER SUSWR RECEIVED. 
3 IF THIS IS NOT DONE, THE MESSAGE “HUNG DIAGNOSTIC” WILL LIKELY BE RECEIVEDesesees 
288 eoeeeeeeeeeeneae 
oe 9.3 ON-BOARD ROM AND EEROM CODE 
291 THESE TESTS VERIFY THE CHECKSUMS OF THE 16-BIT ROM AND THE BASE 
292 AREA OF THE 8-BIT EEROM, AND A WRITE AND READ OF 1‘S AND 0’'S TO 
293 EACH LOCATION OF THE EEROM. THE EEROM MAY BE AFFECTED BY MATIPLE 
294 WRITES, (>10,000 CYCLES) SO IT IS ADVISABLE TO SELECT THIS TEST 
_ WITH CARE. 
297 THE TESTING OF THE ON-BOARD EEROM IS ACCOMPLISHED BY THE SETTING 
298 OF BIT 12 IN THE SOFTWARE SWITCH REGISTER, WHICH WILL SEE THAT THE 
299 EEROM TEST IS RUN ONCE. (PASS 1) IT SHOULD BE NOTED THAT THIS BIT 
300 MAY HAVE ANOTHER USE IN THE SYSMAC MACRO SEOP, BUT IS NOT SO USED 
301 WITHIN THIS PROGRAM. THE BCSR IS ALSO SET FOR HAL.T ON BREAK ON 
302 DURING THIS TEST, AS A TROUBLESHOOTING AID IN STAND-ALONE MODES. 
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SEQ 0007 


eee WHEN RUNNING THIS TEST UNDER APT sees 


AFTER LOADING AND STARTING THE PROGRAM WITH EEROM TEST SWITCH 
ON, APT MUST NOT (BREAK) INTERRUPT THE TEST UNTIL THE TIME 
GIVEN IN SECTION 6, EXECUTION TIMES, HAS PASSSED. 


THIS TEST SHOULD NEVER BE “SCRIPTED” IN A WAY WHICH WOULD CAUSE 
THE TEST TO BE RUN MULTIPLE TIMES. IT SHOULD BE RUN INSTEAD 
ONCE AT THE BEGINING OR END OF A SCRIPT. 


SESOBRSAHSEKEEEES 


THE CONTENTS OF THE EEROM ARE LOST, EXCEPT FOR THE 109 (DECIMAL) BYTE 
REPRESENTING THE SETUP AREA, WHICH ARE RESTORED AT THE END OF THE EEROM 
SUBTEST. IF THE TEST IS INTERRUPTED BEFORE THESE LOCATIONS ARE RE- 
STORED, UNPREDICTABLE RESULTS MAY OCCUR. 


9.4 LINE TIME CLOCKS CODE 
THIS PART OF THE PROGRAM VERIFIES THE FUNCTIONS OF ALL 4 CLOCK 
LINES: 3 OF THEM FROM THE SERIAL LINE CHIP (SOHZ, 60HZ, 800HZ) 


INE. 
NOTE: IN UFD MODE — FUNCTIONS CORRESPONDING TO BOOT ROM 
SELECTION ARE CHECKED 


9.5 SERIAL LINE UNIT CODE 
THESE TESTS VERIFY THE FUNCTIONALITY OF THE SLU CHIP UTILIZING THE 
MAINTENANCE MODE OF THE CHIP. 


9.6 Q22BE CODE 

THESE TESTS VERIFY INTERRUPT ARBITRATION OF THE KDJ11-8. DMA 
PROTOCOL, AND CACHE FUNCTIONS RELATED TO THE DMA ACTIVITIES. 
INCLUDING PMG COUNTER. 


9.7 LIST OF SUBTESTS PERF 


ORMED 
THE FOLLOWING LIST REPRESENTS THE SEQUENTIAL ORDER OF SUBTESTS 


PERFORMED IN COKDACAO..... SUBTESTS WHICH ARE SUBJECT TO THE APT 
QUALIFICATIONS OF SECTION 9.2 ARE INDICATED BY A CACHE-APT LABEL. 
TEST NO. TEST NAME /FUNCTION APT-CACHE SEL NOTES. 
TEST 1 BASE INSTRUCTION SET TESTS  —s a... eee ees 
TEST 2 CHECK (CACHE) REGISTER ACCESS YES 

TEST 3 CCR REGISTER BIT TEST YES 

TEST 4 FORCE MISS TEST YES 

TEST 5 HIT/MISS REGISTER TEST PART 1 YES 

TEST 6 HIT/MISS REGISTER TEST YES 

TEST 7 BYTE ALLOCATION TEST YES 

TEST 10 “9 BIT 15 ee TEST YES 

TEST 11 FLUSH CACHE T YES 

TEST 12 UNCONDITIONAL BYPASS TEST YES 

TEST 13 WRITE WRONG DATA PARITY TEST YES 
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SEQ 0008 
TEST 14 WRITE WRONG TAG PARITY YES 
TEST 15 PARITY ABORT TEST YES | 
TEST 16 PARITY INTERRUPT TEST YES | 
TEST 17 MISCELLANEOUS PARITY TEST YES 
TEST 20 MEMORY SYSTEM ERROR REGISTER vest YES 
TEST 21 CHECK PARITY ABORTS BLOCKED . YES 
TEST 22 MULTI-PROCESSING INSTRUCTION YES 
TEST 23 DATA STORE RAM, TESTS YES 
TEST 24 TAG STORE RAM TESTS YES 
TEST 25 STANDALONE MODE TESTS YES 
TEST 26 MOVING INVERSIONS TEST DATA RAM YES 
TEST 27 MOVING INVERSIONS FOR TAG STORE YES 
TEST 30 PCR READ/WRITE BITS = 3 ..eeeee 
TEST 31 BCSR READ/WRITE BITS  ...ueee 
TEST 32 16 BIT ROM CHECKSUM eeenewee#e 408 ON 
TEST 33 6 BIT EEROM CHECKSUM TEST nape HOB ON 
TEST 34 EEROM CHECKERBOARD MEM TEST _........ NOTE 1.0 
TEST 35 Ty ££ eee re 
TEST 36 LKS INTERRUPT PRIORITY ........ 
TEST 37 LINE CLOCK DISABLE cer eatdieet 
TEST 40 UNCONDITIONAL CLOCK INTERUPTS ....... 
TEST 41 ape. eae ee ONLY DONE PASS 1 
TEST 42 LINE CLOCK INTERRUPTS YES NOT CACHE DEP, APT BREAK SENSITIV 
TEST 43 MAINTENANCE REGISTER TEST  ........... 
TEST 44 SERIAL LINE UNIT REGISTERS ......... 
TEST 45 XCSR BIT 7 achbetiiais 
TEST 46 RCSR BIT 7 AND XCSR BIT 7 __........... DONE ONCE IN APT 
TEST 47 RESET AND XCSR<2!0>  ——....... FIRST PASS ONLY 
TEST SO RESET AND INTERRUPT ENABLE ........... 
TEST 51 INTERRUPT PRIORITY FOR SLU _............ DONE ONCE IN APT 
TEST S2 BREAK CONDITION = ——_—_ lh eee DONE ONLY ONCE 
TEST 53 OVERRUN CONDITION  —— ..ueaee DONE ONCE IN APT 
TEST 54 oly fh. UP ae Oe HOB ON 
TEST 55 MEMORY MAPPING NOT DONE CHAIN MODE, APT, OTHER THAN PASS 1 
TEST 56 WRONG PARITY ABORT TEST  .._......... 
TEST 57 DMA TAG PARITY IN STANDALONE YES HOB DISABLED 
TEST 60 DMA TAG PARITY W/O STANDALONE YES 
TEST 61 DMA WRITE HIT CYCLES YES 
TEST 62 DIFFERENT LEVELS OF INTERRUPTS NOT UFD. ONLY IF Q@22BE FOUND 
TEST 63 ARSITRATION BET PIRQ INTERRUPT NOT UFD, ONLY IF Q@228€ FOUND 
TEST 64 POwER DOWN TEST NOT UFD, ONLY IF Q22BE FOUND 
TEST 65 ARBITRATION BETWEEN INTERRUPT LEVELS NOT UFD, ONLY IF Q22BE€ FOUND 
TEST 66 PMG COUNTER YES NOT UFD, ONLY IF TWO Q22BE FOUND 


AS OF ALY 19864, THIS IS THE LIST OF SUBTESTS, ANY ADDED SUBTESTS WILL REQUIRE 
EDITING OF THIS LIST.... 


NOTE 1. THIS TEST WILL ONLY BE RUN IN FIRST PASS, AND THEN ONLY IF BIT le IS SET 
IN THE SWR.... RUNNING THIS TEST WILL DESTROY EVERYTHING IN THE EEROM 
EXCEPT THE FIRST 109 BYTES...... UFD AREA, SECONDARY BOOTS, AND LOCAL 
LANGUAGE AREA'S WOULD ALL NEED TO BE RESTORED AFTER RUNNING THIS TEST. 
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418 THE FIRST PASS RUN TIME MUST BE ADJUSTED ACCORDINGLY WHEN RUNNING UNDER 
420 
421 é 
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434 167400 $SWR=167400 
435 000300 $ SWRMK = 300 
436 -TITLE COKDACO ye *y CLUSTER DIAG. 
:*COPYRIGHT (C) JUL 
s*DIGITAL EQUIPMENT CORP, 
—ppsaies. MASS. 01754 
| @PROGRAM BY DIAG. ENG. 
3% 
s*THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
pepe (MAINDEC-11-DZQAC-C8), OCT, 1962. 
000001 iTNet 
437 -SBTTL OPERATIONAL SWITCH SETTINGS 
3* 
:¢ SWITCH USE 
3% -eeese ~~ (|. —————_—<_a_aenmaewmnewnwwnnenne 
:¢ 15 HALT ON ERROR 
3% 14 LOOP ON TEST 
3* 13 INHIBIT ERROR TYPEOUTS 
3* 11 INHIBIT ITERATIONS 
3* 10 BELL ON ERROR 
3* 9 LOOP ON ERROR 
:* 8 LOOP ON TEST IN SWR<5:0> 
439 3* ; DO EXTENSIVE DATA RAM TEST 
440 3* 00 EXTENSIVE TAG RAM TEST 
441 . SBTTL MEMORY MANAGEMENT DEFINITIONS 


;@KT11 VECTOR ADORESS 


000250 MMVEC= 250 
3@KT11 STATUS REGISTER ADDRESSES 
177572 SRO= 177572 
177574 SRi= 177574 
177576 SRe= 177576 
172516 SR3= 172516 
s*USER “I” PAGE DESCRIPTOR REGISTERS 
177600 UIPORO= 177600 
177602 UIPOR1= 177602 
177604 UIPOR2= 177604 
177606 UIPORS= 177606 
177610 UIPOR4= 177610 
177612 UIPORS= 177612 
177614 UIPOR6= 177614 
177616 UIPDR7= 177616 
s*USER “D” PAGE DESCRIPTOR REGISTORS 
177620 UDPORO= 177620 
177622 UDPOR1= 177622 
177624 UDPDR2= 177624 
177626 UDPORS= 177626 
177630 UDPOR4= 177630 
177632 UDPORS= 177632 
177634 UDPDRG6= 177634 
177636 UDPDR7= 177636 
s#USER “I” PAGE ADDRESS REGISTERS 
177640 UIPARO= 177640 
177642 UIPAR1= 177642 
177644 UIPAR2= 177644 


177646 UIPARS= 177646 


a e 
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SEQ 0011 
MEMORY MANAGEMENT DEFINITIONS | 
177650 UIPAR4= 177650 | 
177652 UIPARS= 177652 
177654 UIPAR6= 177654 
177656 UIPART= 177656 
@USER “D” PAGE ADORESS REGISTERS 
177660 UDPARO = 
177662 UDPARI= 177662 
177664 UDPAR2= 177664 
177666 UDPARS= 177666 
177670 UDPAR4* 177670 
177672 UOPARS= 177672 
177674 UDPARG= 177674 
177676 UDPART= 17767 
peSUPERVISOR I" PAGE DESCRIPTOR REGISTERS 
172200 SIPDRO= 
172202 SIPDRI- 172202 
172204 SIPDR2= 172204 
172206 SIPDR3S= 172206 
172210 SIPDR4= 172210 
172212 SIPORS= 172212 
172214 SIPOR6= 172214 
172216 SIPOR7= 172216 
;@SUPERVISOR “D” PAGE DESCRIPTOR REGISTERS 
172220 SDPDRO= 172220 
172222 SOPDR1= 172222 
172224 SOPDR2= 172224 
172226 SOPDR3= 172226 
172230 SDPIR4= 172230 
172232 SDPORS= 172232 
172234 SOPDR6= 172234 
172236 SOPDR7= 172236 
JeSUPERVISOR “I” PAGE ADDRESS REGISTERS 
172240 SIPARO= 
172242 SIPARL= 172042 
172244 SIPAR2= 172244 
172246 SIPARS= 172246 
172250 SIPAR4= 172250 
172252 SIPARS= 172252 
172254 SIPAR6= 172254 
172256 SIPAR7= 172256 
ZeSUPERVISOR *D" PAGE ADDRESS REGISTERS 
172260 ARO# 
172262 SDPARI@ 172262 
172264 SOPAR2= 172264 
17 SOPAR3= 17 
172270 SDPAR4= 172270 
172272 SOPARS= 172272 
172274 SOPARG* 172274 
172276 SOPAR7= 172276 
;@KERNEL “I” PAGE DESCRIPTOR REGISTERS 
172300 KIPDRO= 17 
172302 KIPDRi= 172302 
172304 KIPDR2= 172304 
172306 KIPDR3= 172306 
172310 KIPOR4= 172310 
172312 KIPORS= 172312 


172314 KIPOR6= 172314 
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442 


172316 


172376 


001100 


KIPOR7= 172316 
3 KERNEL m4 7 DESCRIPTOR REGISTERS 


*=1 
KDPOR1= 172322 
KDPOR2= 172324 
KDPORS= 172326 


KDPORS= 172332 

KDPDR6= 172534 

KDPOR7= 172336 

s@KERNEL “I” PAGE ADDRESS REGISTERS 
ARO= 172340 


KDP 

KDPAR7= 17237 

° TIONS 

s*INITIAL ADDRESS OF THE STACK POINTER #e¢ 1100 eee 


ERROR= EMT ssBASIC DEFINITION OF ERROR CALL 

SCOPE= IOT 3sBASIC DEFINITION OF SCOPE CALL 

sMISCEI.LANEOUS DEFINITIONS 

HT= 11 ssCODE FOR HORIZONTAL TAB 
OR LINE a. 


LF= 12 3sCODE F 

CR= 15 3:;CODE FOR CARRIAGE RETURN 

CRLF = 200 ::CODE FOR CARRIAGE RETURN-LINE FEED 
<2 i 3 sPROCESSOR STATUS WORD 

STKLMT= 177774 ssSTACK LIMIT REGISTER 

PIRQ@= 177772 ::°R0GRAM INTERRUPT REQUEST REGISTER 
OSWR= ie da. | :PARDWARE SWITCH REGISTER 

DOISP= 177570 ss'4ARDWARE DISPLAY REGISTER 
poem, PURPOSE REGISTER OEFINITIONS 

RO= » SGENERAL side 

Ri= | sGENERS* REGISTE 

R2= #2 1 GENERAL REGISTER 

BRe 63 3 sGENERAL REGISTER 

R4= a4 3 sGENERAL REGISTER 

RS= 65 a] REGISTER 

R6= 86 3 ;GENERAL REGISTER 

R7= “7 3; sGENERAL REGISTER 

SP= “ 33STACK POINTER 


PC= 3 sPROGRAM COUNTER 
: ‘baronrty LEVEL DEFINITIONS 
0 s;PRIORITY LEVEL O 


N1 
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BASIC DEFINITIONS 


3*”"SWITCH REGISTER” SWITCH DEFINITI 
S= 100000 


PRi= 40 
PR2= 100 
PR3= 140 
PR4as 200 
PRS= 240 
PR6= 300 
PR7= 340 
Swi 

SWi4= 40000 
SW13= 20000 
SWi2= 10000 
SWil= 4000 
SW10= 2000 
SWO9= 1000 
SWwO6= 400 
SWO7= 200 
SWO6= 100 
SWOS= 40 
SWO4= 20 
SWwO3= 10 
SWO2= 4 
SWOl= 2 
SWwOO= 1 
SW9= SWO9 
SW6= SWO8 
SW7= SWO7 
SW6= SWO6 
SW5= SWOS 
Sua = SWO4 
SW3= SWO3 
SWes SWO2 
SW1= SWO1 
SWO 

BIT15= 100000 
BIT14= 40000 
BIT13= 20000 
BIT1i2= 10000 
BITi1l= 4000 
BIT10= 2000 
BITO9= 1000 
BITOS= 400 
BITO7= 200 
BITO6= 100 
BITOS= 40 
BITO4= 20 
BITO3S= 10 
BITO2= 4 
BITO1l= 2 
BITOO= 1 
BIT9= BITO9 
BIT6= IT08 
BIT7= BIT07 
BIT6= BITO6 
BITS= BITOS 
BIT4= BITO4 


; sPRIORITY 
; sPRIORITY 
; sPRIORITY 
; PRIORITY 
3 sPRIORITY 
3; sPRIORITY 
3; ;PRIORITY 


r 
% 
NOUS Wlor 


LE 
ONS 
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453 


000010 


000232 


001160 
004024 


000777 001160 
004024 


BIT2= BITO02 
BITis erroL 
BITO= BIT0O 
eBASIC “CPU~ TRAP VECTOR SOORE SSeS 
ERRVEC* a ssTIME OUT AND OTHER ERRORS 
RESVEC= 10 ssRESERVED AND ILLEGAL INSTRUCTIONS 
TSITVEC*=14 s3°T" BIT 
TVEC= 1 as TRACE TRAP 
BPTVEC> 14 1 sQREAKPOINT TRAP (BPT) 
IOTVEC= 20 ss INPUT/OUTPUT TRAP (IOT) eeSCOPEce 
PURVEC’ 24 + POMER FAIL 
EMTVEC= 30 ee TRAP (EMT) ee€RRORes 
TRAPVEC > 34 33 "TRAP” 
TKVEC= 60 ag KEYBOARD VECTOR 
TPVEC= 64 ssTTY PRINTER VECTOR 
PIRQVEC 240 3 sPROGRAM INTERRUPT REQUEST VECTOR 
Te 1 sFLAG FOR UFD 


1@ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A “.+2,.HALT“ 
s@SEQUENCE TO CATCH ILLEGAL TRAPS AMD INTERRUPTS 
s@LOCATION © CONTAINS O TO CATCH IMPROPERLY LOADED VECTORS 


21746 
DISPREG: .WORD 0 1:SOFTWARE DISPLAY REGISTER 
SUREG "WORD 0 1:SOFTWARE SWITCH REGISTER 
j CLR sTHPO 

rr) @eSTART 
.*220 


Ov @777, $THPO 
JP BeSTART 


-SBTTL ACT11 HOOKS 


sHOOKS REQUIRED BY ACT11 


SVPC® sSAVE PC 
HENDAD :31)SET LOC.46 TO ADORESS OF SENDAD IN 
‘WORD 0 1:2)SET LOC.S2 TO ZERO 

33 RESTORE PC 


. = 6SVPC 
.SBTTL APT PARAPETER BLOCK 
§ J CCOSCOSOSSSSSSESSESESESSSESSEESSESESESOOEEEEEESOSEEESOOEEEEEEES 
sSET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
3 LPOSSSSHSSESSESSOKSSSESOSSHSSSSSHSSSSHHSSSPSSSSCSHSSSSOHSSHSSKEHSEABESEE 
.$Xe, 3s3SAVE CURRENT LOCATION 
.°24 +3SET POMER FAIL TO POINT TO START OF PROGRAM 
200 ssFOR APT START WP 
244 ssPOINT TO APT INDIRECT ANORESS PNTR. 
SAPTHDR ;;POINT TO APT HEADER BLOCK 
-*.8X 4sRESET LOCATION COUNTER 
t $F SSSSSOSSHSHSHSEHSHSSSHSSSESSEHSSSESHSHSSSHSSHHOHOSHHSHSSHHHSHHSHSHEHSS 
sSETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
erereee SPEC. 


SHIBTS: .WORD 0 13 TWO HIGH BITS OF 16 BIT MAILBOX ADOR. 


. SEOP 


SEQ 0914 
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001200 
000000 
000000 
000000 
000052 





Ce 
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SEQ 0015 
SMBADR: .WORD SMAIL ;, ADDRESS OF APT om go (BITS 0-15) 
$TSTM: .WORD ssRUN TIM OF LONGEST TEST 
SPASTM: .WORD 1 RUN TIME IN SECS. OF 1S1 PASS ON 1 UNIT (QUICK VERIFY) 
SUNITN: .WORD ssADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
.WORD ‘sETEND- sHATL /2 ssLENGTH MAILBOX -E TABLE( WORDS ) 


De 
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4s4 


.SBTTL COMMON TAGS 


§ LOSSES EOSESESESEESESESEOEEEEEESEESESEESEESESEESESEESEEEESEEEES 
s¢THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
: IN THE PROGRAM. 


-*1100 
SCMTAG: — 9 3sSTART OF COMMON TAGS 
$TSTNM: .BYTE O ssCONTAINS THE Ly NUMBER 
SERFLG: .BYTE 0 ssCONTAINS ERROR FLAG 
SICNT: .WORD O ssCONTAINS SUBTEST ITERATION COUNT 
SLPADR: .WORD 0 ssCONTAINS SCOPE LOOP ADDRESS 
-WORD O ssCONTAINS SCOPE RETURN FOR ERRORS 
SERTTL: .WORD 0 + CONTAINS TOTAL ERRORS DETECTED 
SITEMB: .BYTE 0 88 ITEM CONTROL BYTE 
SERMAX: .BYTE 1 38 . ERRORS PER TEST 
SERRPC: .WORD 0 ssCONTAINS PC OF LAST ERROR INSTRUCTION 
SGDADR: .WORD 0 s sCONTAINS SS OF ‘GOOD TA 
$BDADR: .WORD 0 ssCONTAINS ADORESS OF ‘BAD’ DATA 
$GDDAT: .WORD 0 3 sCONT ‘GOOD’ 
SBODAT: .WORD 0 ssCONTAINS ‘BAD’ DATA 
—— : 3 sSRESERVED--NOT TO BE USED 
sAUTOB: .BYTE 0 ssAUTOMATIC MODE INDICATOR 
SINTAG: .BYTE : ss INTERRUPT MODE INDICATOR 
: -WORD OSWR ssADORESS OF SWITCH REGISTER 
DISPLAY: .WORD OODISP ssADORESS OF DISPLAY REGISTER 
¢TKS: 177560 ssTTY KBO STATUS 
¢TKB: 177562 ssTTY KBO BUFFER 
TPS: 177564 ssTTY PRIMTER STATUS REG. ADORESS 
TPB: 177566 ss TTY PRINTER oh gett REG 
*MULI.: .BYTE 0 ssCONTAINS NULL CHARACTER FOR FILLS 
SFILLS: .BYTE 2 ssCONTADS @ OF FILLER —— REQUIRED 
SFILLC: .BYTE 12 + sINSERT FILL CHARS. AFTER A “LINE FEED” 
STPFLG: ” hee 0 33 "TERMINAL AVAILABLE” FLAG (BIT<07>=0=YES) 
sTHPO; .WORD 0 3sUSER DEFINED 
sTMP1: .WORD 0 — OEF INED 
¢TIMES: © NUMBER OF ITERATIONS 
sESCAPE :0 1 Scape ON ERROR ADDRESS 
377 377 @BELL: .ASCIZ <207><377><377> + CODE FOR BELL 
sQUES: .ASCII /?/ s sQUESTION MARK 
$CRLF: .ASCII <15> ssCARRIAGE RETURN 
000 $LF: -ASCIZ <1i2> ssLINE FEEO 


§ § SSSSSSSSSSSSSSSSTSESSSSSSSSSSSSSSSSSSSSSHSSSSSSHSSSSSSHESSEEESSES 


-SBTTL APT MAILBOX-ETABLE 
§ SOCSOSSSSSSSSSESEESESESEESEESESESSESEEEEESESEESESEERESEEEEESEEES 
VEN 


6MAIL: 33APT MAILBOX 
SMSGTY: .WORD AMSGTY ;;MESSAGE TYPE CODE 
SFATAL: .WORD AFATAL ;;FATAL ERROR NUMBER 
sTESTN: .WORD 

6PASS: .WORD ASS +sPASS COUNT 
¢DEVCT: .WORD ADEVCT ;,;DEVICE COUNT 
SUNIT; .WORD AUNIT 33170 UNIT NUMBER 
$MSGAD: .WORD AMSGAD ;;,MESSAGE ADDRESS 


SEQ 0016 
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000000 
000 
000 


i 


88 


cE lealaadas | 





+ 
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$MSGLG: .WORD 
SE TABLE: 
sENV: BYTE 
sENVM: .BYTE 
$SWREG: .WORD 
SUSWR: .WORD 
$CPUOP: .WORD 
34 

3¢ 

Ge 

3% 

3% 

3% 

SMAMS1: .BYTE 
SMTYP1: .BYTE 
3% 

3 

3% 

3% 

$MADR1: .WORD 
38 

sMAMS2: .BYTE 
sMTYP2: .BYTE 
SMADR2: .WORD 
SMAMSS: .BYTE 
SMTYP3: .BYTE 
SMADRS: .WORD 
sMAnsS4: .BYTE 
sMTYP4: .BYTE 
$ : .WORD 
SVECT1: .WORD 
SVECT2: .WORD 
$BASE: .WORD 
sOEVM: .WORD 
$COWi: .WORD 
sCDW2: .WORD 
$00W0: .WORD 
$00W1: .WORD 
s00W2: .WORD 
s00WS: .WORD 
s00W4: .WORD 
$00WS:  .WORD 
$00W6:  .WORD 
$00W7: .WORD 
$00W8: .WORD 
s00W9:  .WORD 
$00W10: .WORD 
$00W11: .WORD 
$00W12: .WORD 
$00U15: .WORD 
$00W14: .WORD 
$00Wwi5: .WORD 
s$E TEND 


AMAMS 1 
AMTYP1 


SEQ 0017 


1 sMESSAGE LENGTH 
3sAPT ENVIRONMENT TABL 
s sSENVIRONMENT BYTE 


3 sENVIRONMENT MODE BITS 
1s APT ourton REGISTER 
1s USER CHES 


33CPU TYPE, TOPTIONS 
BI7s 15-11°CPU TYPE 
11704201 ,11/05*02,11/20°03,11/40*04 ,11/45=05 
11/7006 ,PD@*07,,Q=10 
BIT 10°REAL TIME CLOCK 
BIT 9=FLOATING POINT PROCESSOR 
MANAGEMENT 


300 
og aT aon ae 


2 
3 sHIGH ADORESS .M.S.BYTE 
3 MEM. TYPE .OLKOS 
| MEM.LAST ADORESS .BLKe3 
3 sHIGH TPE SBLKGd 


SS, BLKe4 
ssINTERRUPT VECTORO1,BUS PRIORITYO1 
ss INTERRUPT VECTORO@2BUS PRIORITYe2 
s sBASE —- OF EQUIPMENT UNDER TEST 


fe ot DESCRIPTOR WORDE13 
ssDEVICE DESCRIPTOR WORDO15 


Fo 
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SEQ 0018 


-SBTTL ERROR POINTER TABLE 

;¢THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 

s¢THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

s*LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 


;@NOTEL: IF sITEMB IS O THE ONLY PERTINENT DATA IS (SERRPC). 
3 @NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
:* EM ssPOINTS TO THE ERROR MESSAGE 
:¢ OH ssPOINTS TO THE DATA HEADER 
i¢ OT ssPOINTS TO THE DATA 
ie OF ssPOINTS TO THE DATA FORMAT 
001324 sERRTB 
4ss 
456 
457 .SBTTL ERROR DEFINITIONS 
456 ;ITEM 1 
459 001324 124316 EM1 sCPU ERROR 
460 001326 132135 OH1 sTEST @, ERROR PC 
461 001330 133342 OT1 3 $TMP1, SERRPC 
462 001332 0 
463 :ITEM 2 
464 001334 124352 EM2 sMMU ERROR 
465 001536 132135 OH1 sTEST @, ERROR PC 
466 001340 133342 OT1 3 $TMP1, SERRPC 
467 001342 0 
sITEM 3 
469 001344 124364 Ems 3sFPP ERROR 
470 001346 132135 OH1 sTEST @, ERROR PC 
471 001350 133342 OT1 3 $TMP1, SERRPC 
472 001352 0 
473 sITEM 4 
474 001354 124376 Ema sERROR IN READ-WRITE BITS OF CCR 
475 001356 132162 Ce sTEST @, PC, EXPECTED DATA, RECEIVED DATA 
476 001360 133350 OT4 ;$TMP1, SERRPC,.R1,CCR 
477 001362 0 
478 sITEM 5 
479 001364 124436 EMS rae MISS WRITES TO CACHE 
4860 001 132247 OHS sTEST @, PC, HIT/MISS, DATA me CACHE, DATA IN MEMORY 
461 001370 133362 OTS ;$TMP1, SERRPC, Re, Ri. $GODAT 
4862 001372 (+) 
483 s ITEM 6 
484 001374 124471 EM6 sFORCE MISS WRITE INVALIDATES CACHE 
485 001376 132247 OHS sTEST @, PC, HIT/MISS, DATA CACHE, DATA IN MEMORY 
001400 133362 OTS 3; $TMP1, SERRPC, R2, Ri. $GODAT 
487 001402 0 
sITEM 7 
489 001404 124534 EM? sUNEXPECTED PARITY INTERRUPT 
490 001406 132346 OH7 sTEST @, PC, ADORESS ACCESSED, MSER 
491 001410 133376 OT7 1 $TMP1, SERRPC , $BDADR ,MSER 
492 001412 fe) 
493 : ITEM 10 
494 001414 124570 EM1 sTAG PARITY ERROR 
495 001416 132346 OH7 sTEST @, PC, ADDRESS ACCESSED, MSER 
496 001420 133376 OT7 3 $TMP1, SERRPC , SBDADR ,.MSER 
497 001422 0 
4 sITEM 11 
499 001424 124611 EM11 sDATA PARITY ERROR 
500 001426 132346 OH7 sTEST @, PC, ADDRESS ACCESSED, MSER 


cat 


Ge 
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S01 


SeRRRse 


133376 
000000 


124633 


132346 
133376 
000000 


0 
sITEM 16 


3 $TMP1, SERRPC , S#BDADR ,MSER 


sLOW BYTE PARITY ERROR 
sTEST @, PC, ADDRESS ACCESSED, MSER 
3 $TMP1, SERRPC , $BDADR ,MSER 


sHIGH BYTE PARITY ERROR 
sTEST @, PC, ADDRESS ACCESSED, MSER 
3 $TMP1, SERRPC , $BDADR ,MSER 


sERROR DATA PATH 


sTEST @, PC, EXPECTED DATA, RECEIVED DATA 


3 $TMP1, SERRPC , $SGDDAT, TSTLOC 


sFORCE MISS READS FROM CACHE 


sTEST @, PC, HIT/MISS, DATA IN CACHE, DATA IN MEMORY 
$GODAT 


,$TMP1, SERRPC, Re, Ri, 


sFORCE MISS READS FROM CACHE AND MISS 
sTEST @, PC, HIT/MISS, mat me CACHE, DATA IN MEMORY 


s$THP1, SERRPC, R2, Ri, 


sERROR IN RECORDING HITS IN HIT/MISS 


sTEST @, PC, EXPECTED DATA, RECEIVED DATA 


3 $TMP1, SERRPC , SGDDAT ,RECDAT 


sWRITE BYTE ALLOCATES CACHE 
3TE - PC 
3 $TMP1, SERRPC 


sWRITE BYTE HIT DOES NOT RECORD HIT 
;TEST @, PC 
3 $TMP1, SERRPC 


sBYTES REVERSED ON WRITE CYCLES 
sTEST @, PC 
3 $TMP1, SERRPC 


sCONDITIONAL BYPASS DOESN'T INVALIDATE CACHE 
sTEST @, PC, HIT/MISS, DATA IN CACHE, DATA IN MEMORY 


i $TMP1,$ERRPC, R2, R1, sGODAT 


sHITS RECORDED AFTER FLUSHING CACHE 
sTEST @, PC, NUMBER OF HITS 
1 $TMP1, SERRPC RS 


SEQ 0019 
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$81 


SSSeRReee 


w 
wo 
= 


DURE SSS ORaE ARES Se SRSESS 
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sITEM 40 
EM4 


He 
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sBYPASS DOESN'T INVALIDATE CACHE 
;TEST @, PC 
3 $TMP1, SERRPC 


sMSER DOES NOT CLEAR ON WRITE REFERENCE 
3 $TMP1, SERRPC 


sPARITY ERROR DON'T CAUSE A MISS 
sTEST @, PC, MSER, HIT/MISS 
3 $TMP1, SERRPC ,MSER,R3,0 


sPARITY ERROR DON'T SET MSER WITH CCR<7>=0 
sTEST @, PC, MSER, VA /MISS 
:$TMP1, SERRPC ,MSER.R 


sPARITY ERROR IGNORED 
sTEST @, PC 
3: $TMP1, SERRPC 


sPARITY ERROR IGNORED ON LOW BYTE 
sTEST @, PC 
3 $THP1, SERRPC 


sPARITY ERROR IGNORED ON HIGH BYTE 
sTEST @, PC 
3 $TMP1, SERRPC 


sPARITY ABORT LOGIC DOESN'T WORK 
3TEST @, PC 
3 $TMP1, SERRPC 


sMSER NOT SET PROPERLY 
sTEST @, PC, EXPECTED DATA, RECEIVED DATA 
3 $TMP1, SERRPC , $GDDAT , MSE 0 


sPARITY INTERRUPT DOESN'T WORK 
sTEST @, PC 
3 $TMP1, SERRPC 


sNXM ANC PARITY ABORT DIN'T HAPPEN 
sTEST @, PC 
3 $TMP1, SERRPC 


sPARITY ABORT NOT BLOCKED BY NXM TRAP 


615 001716 
001720 
1H 001722 


132135 


133342 
000000 


126166 


132530 
133470 
000000 


Ie 
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SEQ@ 0021 


sTEST @, PC 
3 $TMP1, SERRPC 


sMULTI-PROCESSOR HOOK INSTRUCTION DOESN’ T CAUSE MISS 
sTEST @, PC, INSTRUCTION OPCODE 
3 $TMP1, SERRPC , $BODAT 


;ERROR IN FARITY LOGIC 
;TEST @, PC 
3 $TMP1, SERRPC 


sERROR IN CACHE DATA RAMS 
sTEST @, PC, EXPECTED DATA, RECEIVED DATA, CACHE LOCATION 
3 $TMP1, SERRPC .R1,RECDAT , $BDADR 


sERROR IN NXM IN STANDALONE MODE 
sTEST @, PC 
3 $ThP1, SERRPC 


sHITS NOT RECORDED PROPERLY THRU HIT/MISS 
3 $TMP1, SERRPC 


sHIT RECORDED FOR A LOCATION NOT IN CACHE 
sTEST @, PC, LOCATION ACCESSED 
3 $TMP1, SERRPC ,KIPARG, $BOADR 


sMISS RECORDED FOR A LOCATION THAT SHOULD BE IN CACHE 
sTEST @, PC, LOCATION ACCESSED 
3 $TMP1, SERRPC ,KIPARG , $BDADR 


sERROR IN TAG STORE 
sTEST #, PC, ADDRESS 
3 $TMP1, SERRPC .R1, $BDADR 


sERROR PCR READ-WRITE BITS 
sTEST @, PC, EXPECTED DATA, RECEIVED DATA 
3 $TMP1, SERRPC , $GODAT PCR 


sERROR IN BCSR READ-WRITE BITS 
sTEST @, PC, EXPECTED DATA, RECEIVED DATA 
3 $TMP1, SERROC , $SGODAT ,BCSR 


sRESET DOESN'T CLEAR BCSR<4> 
sTEST @, PC 
3 $TMP1, SERRPC 
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673 ;ITEM 54 
674 002054 126777 
675 002056 1321355 OH1 
676 002060 133342 OT1 
677 002062 
678 sITEM SS 
679 002064 127035 
002066 132135 1 
681 002070 133342 OT1 
682 002072 
;ITEM 56 
684 002074 127071 
685 002076 132135 OH1 
686 002100 133342 OT1 
687 002102 
;ITEM 57 
669 002104 127115 
690 002106 132135 OH1 
691 002110 133342 OT1 
692 002112 
693 sITEM 60 
694 002114 127147 
695 002116 132135 OH1 
696 002120 133342 OT1 
697 002122 
; ITEM 61 
699 002124 127215 
700 002126 132135 OH1 
701 002130 133342 OT1 
702 002132 
03 sITEM 62 
704 002134 127244 
705 002136 132135 1 
706 002140 133342 OT1 
707 002142 
sITEM 63 
709 002144 127315 EM63 
710 002146 132135 OH1 
711 002150 133342 OT1 
712 002152 
713 sITEM 64 
714 002154 7346 
715 002156 132135 OH1 
716 002160 133342 OT1 
717 002162 
718 zs ITEM 65 
719 002164 i27405 
720 002166 132766 DOH65 
721 002170 133576 OT65S 
722 002172 
23 s ITEM 66 
724 002174 127455 
725 002176 132135 OH1 
726 002200 133342 OT1 
727 002202 


i°) 
728 s ITEM 67 


;CHECKSUM ERROR IN 16-BIT ROM 
sTEST @, PC 
3 $TMP1, SERRPC 


sCHCKSUM ERROR IN 6-BIT ROM 
sTEST @, PC 
3 $TMP1, SERRPC 


s TIMEOUT READING LKS 
:$TMP1, SERRPC 

sLKS<07> DOES NOT BECOME 1 
TE PC 


| $THP1, $ERRPC 


ear _—— DOESN’ T CLEAR LKS<07> 
a ° 
3 $TMP1, SERRPC 


sILLEGAL LKS INTERRUPTS 
sTE » 
3 $TMP1, SERRPC 


sPROCESSOR INTERRUPTS DON'T CLEAR LKS<07> 
3 $TMP1, SERRPC 


sLKS READY DOESN'T GO LOW 
sTEST #, PC 
3 $TMP1, SERRPC 


sWRONG NUMBER OF LKS INTERRUPTS 
3 $TMP1, SERRPC 


sLKS INTERRUPTS HAPPEN AT WRONG PRIORITY 
sTEST #, PC, PRIORITY 
+ $TMP1, SERRPC , SGODAT 


sB8CSR<12> DOES NOT DISABLES LKS 
sTEST #, PC 
3 $TMP1, SERRPC 





784 002334 
785 002336 


; ITEM 


; ITEM 


; ITEM 


; ITEM 


s ITEM 


; ITEM 


; ITEM 


; ITEM 


; ITEM 


; ITEM 


; ITEM 
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368CSR<13> DOESN'T SET LKS<06> 
iT @, PC 
3 $TMP1, SERRPC 


sRESET DOESN’T SET LKS<7> 
sTEST @, PC 
3; $TMP1, SERRPC 


sRESET DOESN'T CLEAR LKS<06> 
sTEST @, PC 
3 $TMP1, SERRPC 


s TIMEOUT READING SLU REGISTERS 
sTEST @, PC, wos FAILED 
3 $TMP1, SERRPC, $ 


sXMIT READY DIDN'T GO LOW 
sTEST @, PC 
3 $TMP1, SERRPC 


sRCSR DOESN'T BECOME 1 
sTEST @, 
3 $TMP)., SERRPC 


sWRONG CHARACTER RECEIVED 
sTEST @, PC, EXPECTED a RECEIVED DATA 
:$7MP1, SERRPC, SGDDAT , $BD0AT 


sRCSR<O7> NOT CLEARED AFTER READING RBUF 
3 $TMP1, SERRPC 


sXCSR<O7> NOT SET ON RESET 
3 $TMP1, SERRPC 


sRCSR<O7> NOT CLEARED ON RESET 
sTEST @, PC 
3 $TMP1, SERRPC 


sSLU INTERRUPTS HAPPEN AT 4 
3 $TMP1, SERRPC 


sRESET DOES NOT CLEAR XCSR<6> AND RSCR<6> 
sTEST @, PC 
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786 002340 1335342 OT1 
787 002342 000000 0 
788 sITEM 103 
789 002344 130257 —M103 
002346 132135 OH1 
791 002350 133342 OT1 
792 002352 000000 t+) 
793 ;ITEM 104 
794 002354 1303352 EM104 
795 002356 132135 OH1 
796 002360 133342 OTi 
797 002362 000000 0 
798 ;ITEM 105 
799 002364 130402 EM105 
800 002366 133076 O0H105 
601 002370 133620 0T105 
802 002372 t+) 
80 sITEM 106 
804 002374 130455 EM106 
605 002376 133076 OH105 
002400 133620 O0T105 
807 002402 000000 (¢) 
608 sITEM 107 
809 002404 130533 €M107 
810 002406 132135 1 
8611 002410 133342 OT1 
612 002412 0 
813 ;ITEM 110 
614 002414 130567 EM110 
615 002416 132135 1 
816 002420 133342 OT1 
817 002422 0 
616 ;ITEA 111 
819 002424 130631 EM111 
820 002426 132162 
621 002430 133605 OT75 
822 002432 0 
823 sITEM 112 
624 002434 130707 EM112 
625 002436 133076 0H105 
826 002440 13 07105 
827 002442 Oo 
628 sITEM 113 
829 002444 130772 EM113 
830 002446 133076 OH105 
831 002450 133620 O0T105 
832 002452 000000 0 
833 ;ITEM 114 
634 002454 131056 EM114 
835 002456 132135 1 
836 002460 133342 OT1 
637 002462 0 
638 sITEM 115 
839 002464 131077 Em115 
002466 133130 0H115 
1 002470 133630 07115 
842 002472 
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3 $TMP1, SERRPC 


s TRANSMIT INTERRUPT DOES NOT CLEAR XCSR<07> 
sTEST @, PC 
; $TMP1, SERRPC 


sRECEIVE INTERRUPTS DON'T CLEAR RCSR<07> 
3 $TMP1, SERRPC 


sBREAK CONDITION DOES NOT SET RBUF PROPERLY 
sTEST @, PC, RBUF 
3 $TMP1, $ERRPC .RBUF 


sRBUF WASN'T CLEARED ON NEXT CHAR. 
sTEST @, PC, RBUF 
3 $TMP1, SERRPC , RBUF 


sERROR IN WRITING TO XCSR<0> 
sTEST @, PC 
3 $TMP1, SERRPC 


sRESET DOES NOT CLEAR XCSR<00> 
3TEST @, PC 
3 $TMP1, SERRPC 


sFIRST CHARACTER WAS NOT OVERRUN BY THE SECOND 
sTEST @, PC, EXPECTED DATA, RECEIVED DATA 
3 $TMP1, SERRPC , $GDDAT , $BDDAT 


sOVERRUN CONDITION DOES NOT SET PROPER BITS IN RBUF 
3 $TMP1, SERRPC ,.RBUF 


sRBUF WAS NOT CLEARED ON THE NEXT CHARACTER 
STEST #, PC, RBUF 
1 $TMP1, $ERRPC , RBUF 


sERROR IN XCSR<2> 
3 $TMP1, SERRPC 


_— IN TAG STORE FROM STANDALONE MODE 
s TEST ADDRESS ACCESSED 
t STHPL, SERREC, $BDDAT , KIPARG , $BDADR 


131147 


132135 


133342 
000000 


131747 
132135 
133644 


131774 


; ITEM 


; ITEM 


s ITEM 
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116 
EM116 
OH1 
OT1 
0 

117 
EM117 
OH1 
oT1 
0 

120 
EM120 
OH1 
OT1 
0 


sITEM 121 


sITEM 12 


te) 
sITEM 123 


;ITEM 124 


;ITEM 125 


:; ITEM 


s ITEM 


; ITEM 


; ITEM 


Me 


sO0MA TAG PARITY DOES NOT SET MSER<4> 
sTEST @, PC 
3 $TMP1, SERRPC 


sMSER<13>NOT SET IN STANDALONE MODE 
sTEST @, PC 
3 $TMP1, SERRPC 


sOMA WRITE HITS DON'T INVALIDATE CACHE 


‘;TEST @, PC 


3 $TMP1, SERRPC 


Tt ON WRITE DMA HITS NOT EVERYTHING IS INVALIDATED 
oO 6 
3 $TMP1, sERRPC 


sREAD OMA HIT IS MESSED UP 
sTEST @, PC 
; $TMP1, SERRPC 


;ERROR IN DMA CYCLES FROM Q22BE 
;TEST @, PC 
3 $TMP1, SERRPC 


sPIRQ INTERRUPTS DON’T TAKE PRIORITY OVER Q@ BUS INTERRUPTS 
sTEST @, PC 
+ $TMP1, SERRPC 


sNO POWER DOWN TRAP TO 24 OCCUR 
sTEST @, PC 
:$TMP1, SERRPC 


sERROR IN INTERRUPTS FROM Q22BE 
sTEST @, PC 
3s $TMP1, SERRPC 


sERROR IN PMG COUNTER 
sTEST @, PC 
3 $TMP1, SERRPC 


sUNEXPECTED TIMEOUT 
3 $TMP1, SERRPC 


sERROR WRITING TO LKS<6> 





Ne 
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132135 
133342 
000000 


132024 
132135 
133342 
000000 


DH1 
OT1 


0 
;ITEM 132 
EM 


0T134 
0 


s;TEST @, PC 
;$TMP1, $ERRPC 


sMAINTENANCE REGISTER ERROR 


TEST @, PC 
; $TMP1, SERRPC 


; EEROM TYPE ERROR 


;TEST @, PC 
3 $TMP1, SERRPC 


; ERROM WRITE/READ ERROR 


sTEST @, PC, ERROR 


-SBTTL GLOBAL VARIABLES AND REGISTER NAMES 
tree FOR THE FIRST Q22BE 


SR WORD 0 
CsR2: .WORD 0 
BA: -WORD 0 
WC: -WORD 0 
DATA: .WORD 0 
V@BE1: .WORD 0 
V@PRi: .WORD 0 
SIMGOA: .WORD 0 
sREGISTERS FOR THE SECOND Q22BE 
CSRi2: .WORD 0 
CSR22: .WORD 0 
BAe: -WORD O 
WCe: -WORD O 
DATA2: .WORD 0O 
V@BE2: .WORD 0 
v@PR2: .WORD 0 
LKSFL: .WORD 0 
ACTCHS: .WORD 0 
VPCR: .WORD 0 
SAVBR: .WORD 0 
TEMP : -WORD O 
-BLKW 15. 
TIMOUT: .WORD 0 
000012 000006 Q22EN: .WORD 532,12,6,.2 
BCR= 177524 
BOR= 177524 
BCSR- 177520 
CCR= 177746 
HITMIS= 177752 


s;CONTROL REGISTER 1 FOR Q22BE 
sCONTROL/STATUS REGISTER 2 
OMA FOR Q22BE 


2BE 
sADORESS OF VECTOR FOR Q22BE 
sPRIORITY 
;SIMULTANEUOS GO ADORESS REGISTER 


sCONTROL REGISTER 1 FOR Q22BE 
sCONTROL/STATUS REGISTER 2 
sOMA ADDRESS FOR Q22BE 

sWORD COUNT REGISTER 

sO0MA DATA FOR Q22BE 

sADDRESS OF VECTOR FOR Q228E 
sPRIORITY 


ACTUAL CHECKSUM 


sRESERVED FOR BLOCK MODE TRANSFER 
s;PRIORITY 7-4 FOR Q22BE 


sBOOT/DIAGNOSTICS CONFIGURATION 
sBOOT/DIAGNOSTICS DISPLAY 


sHIT OR MISS REGISTER 


COUNT, PATTERN, DATA READ, ADDRESS 
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GLOBAL VARIABLES AND REGISTER NAMES 


956 177734 

957 177546 
177750 

959 177744 

960 17 

961 177772 

962 177562 

963 177560 
177566 

965 177564 

966 

967 177766 

968 

969 177572 

970 177574 

971 177576 

972 172516 

973 120001 

974 000000 

975 

976 

977 

976 

979 

980 

961 

962 

963 

SAA 

965 

966 003012 000000 

967 003014 000000 

968 

969 


1010 003110 
1011 003120 000000 
1012 003122 


KMCR= 177734 s UNIBUS ed nA REGISTER 
LKS= 177346 sCLOCK STATUS REGISTEK 

MAIREG= 177750 sMAINTENANCE REGISTER 

MSER= 177744 sMEMORY SYSTEM ERROR 

PCR= 177522 sPAGE CONTROL REGISTER 

PIR= 177772 sPROGRAN yt ye REQUEST 
RBUF « 177562 sRECEIVER DATA BUFFER 

RCSR= 177560 sRECEIVER STATUS REGISTER 
XBUF « 1773566 s TRANSMITTER DATA BUFFER 
xCSR- 177564 | TRANSMITTER STATUS REGISTER 
CPEREG= 177766 1CPU ERROR REGISTER 

PERRO" SRO sMEMORY MANAGEMENT REG. 0 
PPR1°SR1 sMEMORY MANAGEMENT REG. 1 
MPR2]°SR2 ’ MANAGEMENT REG. 2 
PPRS-SRS sMEMORY MANAGEMENT REG. 3 
wus 


-SBTTL GLOBAL DATA SECTION 


gee 
s THE ge Bh DATA a CONTAINS DATA THAT ARE USED 
s IN MORE THAN ONE TEST 

g7e 


3 THESE = get ge ARE USED IN MORE THAN ONE TEST TO STORE VECTOR DATA 
sWHEN THE T NEEDS TO HAVE AN ERROR CONDITION RESPOND DIFFERENTLY 

;FROM THE + ga RESPONCE . 

SLOCOO: .WORD 

SLOCO1: .WORD ° 

s THESE LOCATIONS ARE USED IN MORE THAN ONE TEST TO STORE WORKING DATA. 


G 


u : .WORD 0 sSTORES LOW ADDRESS FOR RAM TESTS 

: .WORD 0 sSTORES ADORESS FOR RAM TESTS 

: .WORD 0 CONTAINS TOTAL NO EEROM 
TSTADO: .WORD 0 sADORESS STORE FOR RAM TESTS 

: .WORD O sADORESS STORE FOR RAM TEST 
FLAG: .WORD 0 sUSED TO STORE “FLAG CONDITIONS 
COMPAS: .WORD 0 ’ - FOR CONTROL OF CACHE SUBTESTS 
EEPAS: .WORD 0 8 - FOR OF EEROM SUBTEST 
SAVSUP: .WORD 0 sUSED TO STORE SUPERVISOR STACK VALLE 
SAVUSE: .WORD 0 sUSED TO STORE USER STACK V 
SAVARO;: .WORD 0 sUSED TO STORE f@& STATUS REGISTER O DATA 
SAVPR1: .WORD 0 sUSED TO STORE Mf STATUS REGISTER 1 DATA 
SAVPR2: .WORD 0 sUSED TO STORE fm) STATUS REGISTER 2 DATA 

VSR; .WORD 0 VE CH EEROM TEST 

FLOAT: .@LKW 4 sUSED TO STORE VALUES FOR few TESTS 
FLO: -OLKW 4 sUSED TO STORE VALUES FOR few TESTS 
SEQ: -WORD O sSTORES SE OR wre TESTS 
SPS: -WORD O sSTORES STACK POINTER FOR JUMP TESTS 
SPSJ: .WORD 0 sSTORES STACK POINTER FOR Jum TESTS 
BTEXP: .BiKW 4 sSTORES EXPONENT DURING BIT TESTS 
BTRES: .BikKW 4 sSTORES RECIEVED DATA FOR BIT TESTS 
COUNT; .WORD 0 sERROR INDICATOR FOR FLOATING POINT TESTS 
RECFEC: .BiKW 4 sRECIEVED FLOATING POINT EXCEPTION CODE 


SEQ 0027 


1013 003152 
1014 003142 
1015 
1016 
1017 003152 
1018 003154 
1019 
020 


COKDACO KDJ11-8 CLUSTER DIAG. 
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4. 
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RECST: .BLKW 4 sRECIEVED FLOATING POINT STATUS 
RECOST: .BLKW 4 sDESTINATION ADORESS FOR FLOATING POINT TESTS 


3 THESE LOCATIONS ARE USED BY MORE THAN ONE TEST AS LOOP COUNTERS 
ALLCTR: .WORD 0 
LOOPIM: .WORD 0 


SOME MORE TEMPORARY STORAGE FOR RAM TESTS 
SAVPOS: .WORD 0 sSTORES TEMPORARY BIT POSITIONS FOR RAM TESTS 
MASK ; .WORD 0 sSTORES BIT MASK FOR ERROR ISOLATION 


sif!i:THIS IS IT. THE PROGRAM TEST LOCATION! !!iiissessesesess 
TSTLOC: .WORD 0 

-OLKW 20. 
sFPP ames DEFINITIONS 


ACi= #1 
AC2= #2 
AC3S- #3 
AC4= 84 
ACS= 85 
AC6* 86 
ACT= #7 


sFPP INTERRUPT VECTOR 
FPVEC*244 


STBOT= 1000 


~ 
& 
~— 
ee 
o 


123456 
000000 


k 
eo 
. 


: 
vi] 
w 
wa 
Ww 
w 


<4 
& 
= 


“ee. © @ 


SEQ 0026 


COKDACO KDJ11-8 CLUSTER DIAG. 


GLOBAL DATA SECTION 


1071 003316 


1120 12 
1121 003514 

003522 
1122 603524 


i 


047050 TAB6A: 


000200 TAB?: 


000200 TABS: 


i 
| 
, 


000000 
030000 TAB10: 


016400 TAB11: 


030000 003000 000002 TAB1I1A 
000000 

016100 000000 000000 TAB12: 
00000 

016200 TAB1S: 


H 
G RONBDEGDOGDSOGDSGGEE HOUAH § BEGDOGDEE HOGDEADNDDOLES 


030000 003000 000000 1A8138 
030000 TAB14: 


024700 TABIS: 


TABI6: 


He 


TAB17: 


023456 TAB18: 


100200 000000 000000 TAB21: 
000000 
100400 000000 000000 TAB22: 
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° 33 
° 
°o 


Tg 


100200,0,0,0 
100400 ,0,0,0 


SEQ 0029 


COKDACO KDJ11-B8 CLUSTER DIAG. 
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1123 
00 


1124 


000000 
000000 
177777 
177777 
177777 


004112 
000040 


177777 
000100 
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000000 
000000 
177777 
177777 
000000 
052525 
052525 


‘3 CCP /ORION wage Re SAVE EMTULATOR AND PRIORITY 


TAB23: .WORD 
TAB24: .WORD 
TAB25:  .WORD 
TAB26: .WORD 
TAB27: .WORD 
TAB26: .WORD 
TAB29: .WORD 
TAB29A; .WORD 
TAB3O: —. WORD 
TABS1: .WORD 
TABSe: .WORD 
TABS3: .WORD 
TABS4: .WORD 
TAB40: .WORD 
TAB41: .WORD 
TAB42: .WORD 
TAB43: .WORD 
TAB4S: .WORD 
TAB46: .WORD 
TAB47: .WORD 
TAB47A: .WORD 
TAB48: .WORD 
TAB49; .WORD 
STAR 
EMTSAV: TST 
8IT 
OV 
BIT 


200,0,0,1 
62400 ,0,0,0 
1100,0,0,0 
100600,0,0,0 
1000,0,0,0 
600,0,0,0 
10100,0,0,0 
10100,0,2000,0 


500,0,0,0 
100400 ,0,0,0 
16000,0,0,0 
11600,0,0,0 
640,0,0,0 
77600 ,0,0,0 
100200,0,0,1 
340,0,0,0 


77,177777,177777,177776 


$77,-1,-1,-1 
577,-1,0,0 


173737, 124242 ,052525 , 12346 
0,.0,052525, 12346 
173737, 124242,0,0 


600,0,0,0 


ViKOR 
¢6ITS, 8052 
VMKOR 
@-1 »UFOFLG 
*6IT6, 8052 


SEQ 0030 


ss FIRST TIME THROUGH ? 

33 BRANCH IF BEEN HERE ALREADY 
33 ARE WE IN UFD MODE ? 

33 LEAVE IF NOT 

33 SET UFD FLAG 

33 ARE WE IN QUIET MODE ? 


COKDACO KDJ11-8 CLUSTER DIAG. 
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001403 


012737 177777 
104042 


005060 
013737 
013737 
000404 


000000 
000000 


1149 


004322 
177570 
177570 
177777 


012737 


004 
1150 004372 0153737 
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SEQ 0031 
BEQ 33 BR IF NOT 
004120 MOV @-1,UQUIET ss SET QUIET MODE 
1%: EMT ss GET ADORESS OF XXDP DCA TABLE 
CLR 42(RO) 33 CLR XXDP+ “DRSERR” 
004112 MOV 30, SAV30 33 SAVE EMULATOR ADDRESS 
004114 MOV 32, SAV32 3s SAVE EMULATOR PRIORITY LEVEL 
BR vei 33 GET AROUND TAG AREA 
SAV3O: .WORD 0 ss PUT EMULATOR INFO HERE 
SAV32: .WORD 0 3s PUT PRIORITY LOCATION HERE 
UFOFLG: .WORD 0 33 USER FRIENDLY MODE FLAG 
a : .WORD O ss UFO QUIET MODE FLAG 
sOCOOORESEOSSESSESSESERESEEESEESEESSSESEEEEESEEEEESEESEESESESEESEESEEES 
18: 
.S8TTL INITIALIZE THE COMMON TAGS 
3 3CLEAR THE COMMON TAGS ($CMTAG) AREA 
MOV os oR6 ssFIRST LOCATION TO BE CLEARED 
CLR (R6)« 3sCLEAR MEMORY LOCATION 
CMP @SUR,.RE ; ;DONE? 
BNE - 33LO0P BACK IF NO 
MOV @STACK , SP 33SETUP THE STACK POINTER 
ssINITIALIZE A FEW VECTORS 
000020 | MOV @tSCOPE ,@@IOTVEC ;;IOT vector FOR SCOPE ROUTINE 
000022 MOV @340 ,O@IOTVEC+2 : LEVEL 7 
000030 MOV @sERROR ,QSEMTVEC ;;EMT VECTOR FOR ERROR ROUTINE 
000032 MOV 0340, BeENTVEC +2 ssLE 
000034 MOV Os TRAP, 80 BOTRAPVEC 7 bmg VECTOR FOR TRAP CALLS 
000036 MOV 0340, @OTRAPVEC+2;LEVEL 7 
000024 MOV @¢PURDN, BOPURVEC ; ;POWER FAILURE VECTOR 
000026 MOV 0340 ,GOPURVEC+2 ;;LEVEL 7 
135506 MOV sENDCT , SEOPCT 33SETUP END-OF -PROGRAM COUNTER 
CLR ¢TIMES ssINITIALIZE NUMBER OF ITERATIONS 
CLR sESCAPE 88 THE ESCAPE ON ss 
001115 MOvB 01, SERMAX : ONE ERROR PER T 
001106 MOV @., SLPADR ssINITIALIZE THE LOOP ADDRESS FOR SCOPE 
001110 MOV ‘ 33SETUP THE ERROR LOOP 
ssSIZE FOR A SWITCH REGISTER. IF NOT FOUND OR IT IS 
;sEQUAL TO A * SETUP FOR A SOFTWARE SWITCH REGISTER. 
MOV  DERRVEC. - (SP) 3:3:SAVE ERROR VECTOR 
MOV 064% .@9ERRVEC ;;SET UP ERROR VECTOR 
001140 MOV SUR 33SETUP FOR A HARQWARE SWICH REGISTER 
001142 MOV e00ISP, DISPLAY ;;AND A HARDWARE DISPLAY REGISTER 
174622 CMP 6-1, asuR s3sTRY TO REFERENCE HARDWARE SUR 
BNE 665 3 sBRANCH IF NO TIMEOUT TRAP OCCURRED 
33AND THE HARDWARE SWR IS NOT = -1 
BR 65% 3 :;B8RANCH IF NO TIMEOUT 
64%; ~~ 065% ,(SP) 1 ySET UP FOR TRAP RETURN 
001140 65%: MOV SUR ssPOINT TO SOFTWARE SwR 
001142 MOV @DISPREG , DISPLAY 
66%: MOV (SP )+ , QeERR ssRESTORE ERROR VECTOR 
CLR #PASS 33CLEAR PASS COUNT 
001221 BITB @APTSIZE,SENVM ;; TEST USER SIZE UNDER APT 
BEQ 67% 33 YES,USE NON-APT SWITCH 
001140 an MOV @SSWREG , SWR TNO, USE APT SWITCH REGISTER 
004120 MOV UFOFLG,UQUIET sABORT IN UFD ON ERROR 
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1151 004400 012737 135056 000004 MOV @TOUT ,@@ERRVEC ;POINT TO LL a ROUTINE 
1152 004406 012737 000340 000006 MOV 340, +2 ;AT PRIORITY 
1153 004414 012737 134326 000114 MOV @RAMPAR ,80114 sPOINT PARITY. ABORT 
1154 004422 012737 000340 000116 MOV 0340 , 80116 sAT PRIORITY7 
1155 004430 012737 135240 000250 MOV @PUTRP , 86250 sPOINT MMU TRAP VECTOR 
1156 004436 012737 000340 000252 MGV 0340 ,80252 3 
1157 004444 005037 177766 CLR 90177766 sCLEAR CPU ERROR REGISTER 
1158 004450 032737 000100 000052 BIT BI T06 8052 sIN UFD QUIET MODE ? 
1159 004456 001122 BNE LOOP sIF SO, SKIP PRINTOUT 
1160 004460 012701 004472 MOV #.+12,R1 sSTORE LOCATION POINTER 
1161 004464 012711 177777 MOV @-1, 4 sMAKE SURE TO PRINT NOT ONLY AT FIRST TIME 
1162 .SBTTL TYPE PROGRAM NAME 
3 TYPE THE NAME OF THE PROGRAM IF FIRST PASS 
004470 005227 177777 INC @-1 ssFIRST TIME? 
004474 001044 BNE - 68% 3 3BRANCH IF NO 
004476 022737 135546 000042 CMP @sENDAD , 842 ssACT-11? 
004504 001440 BEQ -, 3 3BRANCH IF YES 
004506 104401 004554 TYPE - TYPE ASCIZ STRING 
.SBTTL GET VALUE oe OR SOFTWARE SWITCH REGISTER 
004512 005737 000042 TST e&42 33ARE WE RUNNING UNDER XXDP/ACT? 
004516 001012 BNE 70% 3sQRANCH IF YES 
004520 123727 001220 000001 CMPB sENV , #1 33sARE WE RUNNING UNDER APT? 
004526 001406 BEQ 70% 3sBRANCH IF YES 
004530 023727 001140 000176 CMP SUR, OSWREG 1 SOF TWARE SWITCH REG SELECTED? 
004536 001005 BNE 718 3 3;BRANCH IF NO 
004540 104406 GTSUR 33GET SOFT-SWR SETTINGS 
004542 000403 BE 718 
ote oo 112737 000001 001134 ~ : MOVB #1, $AUTOB 33SET AUTO-MODE INDICATOR 
004552 000415 BR 68% 33GET OVER THE ASCIZ 
Ts -ASCIZ <CRLF>eKDJ11-8 cPu OIAGNOSTIC*<CRLF > 
1163 
1164 Noe 3; DEBUG AID 
1165 004610 123727 001220 000001 CMPB sENV, #1 3 RUNNING UNDER APT? 
1166 004616 001020 BNE § 3 DEFAULT NO-APT INITIALIZATION 
1167 004620 013700 001224 MOV SUSUR ,RO 3 WORK COPY PASS CALCULATION 
1168 004624 005700 TST RO 3; IF = 0 DEFAULT VALUE 
144 004626 001420 BEQ 25% 3s SETUP DEFAULT VALUE 
1171 004630 042700 000017 BIC #17,R0 s CLEAR LOW ORDER NIBBLE 
117. 000241 CLC 3 ASSURE NO UNKNOWNS 
1173 004636 006000 ROR RO : 4 ROTATES = DIVIDE 
1174 004640 006000 ROR RO 3 BY 16 (C*PASS TIME) 
1175 004642 006000 FoR RO 3s THIS AREA SUBROUTINE 
1176 004644 ROR RO 3 WITH GENERAL PURPOSE 
1177 004646 005700 TST RO 3 DIVIDE, THIS TEST TO 
te 004650 001413 BEQ 30% 3; DETERMINE SKIP ALTOGETHER 
1180 004652 010037 003032 MOV RO, CCHPAS sRESIDUE = NO. OF DESIRED PASSES 
1161 004656 000415 BR 35% 3 CONTINUE ON 
1162 004660 012737 177777 003032 20%: MOV @-1,CCHPAS 3 LARGEST NUMBER NO APT MODE ?? 
1183 004666 000407 BR 35% 
1184 004670 012737 000001 003032 25%: MOV ' #1,CCHPAS : NORMAL DEFAULT = 1 
1165 004676 000403 BR 35% 
1186 004700 012737 000000 003032 530%: MOV #0 ,CCHPAS : NO CACHE TESTS INCLUDED 
1187 004706 000240 35%: NOP 3; DEBUG AID 


MS = 
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032737 000200 000052 
001002 
004737 134404 


000004 


004726 


005000 
001005 


SEQ 0033 
BIT @B8ITO7,8e@52 sUFO MONDE? 
BNE OOP sIF YES, BRANCH 
JSR PC ,Q@22S1Z sSIZE FOR Q22BE 
LOOP : 
.OSABLE AMA 
jf POOOOOSESSESEEESSESEESEEESSEESEESEEESEEESSEOSEESEEEEEESEESEEEES 


TST1: SCOPE 

-SBTTL BASE INSTRUCTION SET TESTS 

{PROSSER ESESEESESEESESEESEESESEEEEESEERESEESEEEESEEEESESSESEESESSESEEEESS 
j SOOOESESSESESEESESESEESEESESSESEEEEESESEEESEEESESEEEEEEESEESESEESEEEEEEESS 
: BEGIN BASE INSTRUCTION SET TESTING 

{ PSOOESEESESEESESESEESESEEEESEESESEEESESEESESEESEESESEEEESESEESEESEEEEEEEES 
j OCOOOSEESESESEESESEESSESESESOEESEEDESEESESEESESEOSEEEESEESEESESEESESSESEEES 


FRSTST: 
sTEST BEQ BNE INSTRUCTIONS 


3 § SSSSSSSHSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSEHSSSSSSSSESSESESESESS 


3 THESE a ARE FUNDAMENTAL TO RECOGNIZING ERROR CONDITIONS 


CLZ sCC*0100 - Z BIT CLEARED 
BEQ is s*TEST INSTR -TRY TO CAUSE A BEQ ERROR 
BNE 2s sBRANCH IF 
3sTHE Z FLAG DIDNT CLEAR OR BRANCH FAILED. 
sFAILURE AT hy LOCATION 
sCOULD MEAN A BUS PROBLEM, MICRO-CODE PROBLEM 
:CORDITION CODE PROBLEM OR JUST ABOUT ANYTHING 
1%: ERROR ol ep ERROR 
2s: ccc 3 
SEZ sCOND CODES = 0100 (ZERO) 
BNE 3% s*TEST INSTRe TRY TO BRANCH ON ZERO FLAG 
BEQ 4s 3*TEST INSTRe BRANCH IF GOOD 
sBRANCH FAILURE WITH Z BIT SET 
3%: ERROR vl} 3 
4$: sEND OF TEST 
Me: 
3 TEST BRANCH ON CARRY 


3 § SSSSSSSSSSSSSSSSSSSHESSSSSSSSSSSSSSSSSSSSSSSSSSSHSSSESEHESESESEEE 


sTHIS IS A TEST TO SEE IF THE MODULE FORM ANTICIPATED IS FEASIBLE. 


ccc 8 
Bcc 2s 3*TEST INSTRe 
sBRANCH CARRY CLEAR FAILED 
1%: ERROR +1 sCPU ERROR 
2s: SEC 3CC#1111 
BCS 4$ 3*¢TEST INSTRe 
3; BRANCH CARRY SET FAILED 
= ERROR +1 sCPU ERROR 
M3: 
3 TEST DATA PATHS 
CLR RCO 
BNE 1$ ;TRY TO INSURE WE ARE TESTING 


3s THE DATA PATH AND NOT THE “CLR RO” INSTRUCTION 


piotasieiacn-aaioee aces 


I3 
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BASE INSTRUCTION SET TESTS 


005006 012737 
022737 
001401 


104001 


000000 


125252 
125252 


177777 
177777 


125252 
125252 


177777 


1%: 
2s: 


1%: 


2s: 


CLR CRO) 
BNE i$ 
TST 800 
BEQ 2s 
ERROR +1 


TEST DATA PATHS - ONES AND ZEROS 
MOV #125252, 800 


CMP #125252.900 


BEQ es 


ERROR +1 


TEST DATA PATHS - DATA 0‘S AND 1'S 
MOV #052525 , 860 


CMP 900 , 2052525 
BEQ es 
ERROR +1 


TEST DATA PATHS - 1'S 
CLR B60 


COM B00 

CMP 800, 0177777 
BEQ es 

ERROR +1 


RO BIT TESTS 
MOV 


#177777 ,RO 


chp RO, 0177777 
BEQ is 

ERROR +1 

CLR RO 

chp RO, #0 

BEQ $ 

ERROR +1 

MOV #1 .RO 
cmp RO, #125252 
BEQ & 

ERROR +1 

MOV #52525 ,RO 


sFORCE LOCATION TO ZERO 
sTRY TO INSURE 0-0 


sAGAIN, TRY TO INSURE THAT 0-0 
sBRANCH IF GOOD 

sLOCATION O NOT SETUP PROPERLY 
CPU ERROR 


30*125252 
sSEE IF DATA MADE IT 


MOV 
s INSTRUCTIONS FAILED 


sCPU ERROR 


sEND OF TEST 


sSETUP DATA 


; TEST FOR CORRECT DATA 


;CPU ERROR 


SET UP MEMORY LOCATION O = 111111 


H 
: TEST DATA 


sBRANCH IF NO ERROR 
CPU ERROR 


3RO#=177777 
oe 177777 


SEQ 0034 
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BASE INSTRUCTION SET TESTS 


1327 005136 
1328 005142 


020027 
001401 


104001 


012703 


052525 


177777 
177777 


177777 
177777 


125252 
125252 


177777 


1%: 
2s: 
3%: 


4$: 

a 
GPR2TS: 
3 


1$: 
2s: 
3%; 


4%: 

3 
GPR3TS: 
F 


«S83 
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Ri BIT TESTS 


@177777,R1 
a 


R2 BIT TESTS 


R3 BIT T 
MOV 


#177777 ,R2 
ats 


ESTS 
0177777,R3 


sD0ES Ri*177777 


3R2°177777 
s09ES R2=177777 
YES GO ON 


3R3*177777 








LT ee a 9 Pasian a Te 
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SEG 9036 
BASE INSTRUCTION SET TESTS 

1390 005306 020327 177777 CMP R3,0177777 sD0ES R3*177777 
1391 005312 00140 BEQ 1$ sYES GO ON 
1392 sNO GO TO ERROR 
1393 005314 104001 ERROR +1 sCPuU E 
1394 005316 005005 1$: CLR R3 3R3=0 
1395 005320 020327 000000 R3,00 sD0ES R3=0 
1396 005324 001401 BEQ 2s sYES GO ON 
1397 sNO GO TO ERROR 
1396 005326 104001 ERROR +1 sCPu E 
1399 005330 912703 125252 2s: MOV #125252 ,R3 sR3*125252 
1400 005334 020327 125252 CMP R3, 0125252 sD0ES R3=125252 
1401 005340 001401 BEQ sYES GO ON 

sNO GO TO ERROR 
1403 005342 104001 ERROR +1 3CPU 
1404 005344 012703 052525 3$: MOV #52525 .,.R3 sR3*52525 
1405 005350 020 052525 CMP R3, sDOES R3=52525 
1406 005354 001401 BEQ 4 sYES GO ON 
1407 sNO GO TO ERROR 
1406 005356 104001 ERROR +1 CPU E 
1409 005. 4$: 
1410 3 
1413 005360 GPR4TS 
1414 $ R4 BIT TESTS 
1415 005360 012704 177777 MOV 0177777 ,R4 3R42177777 
1416 005364 7 177777 CMP R4,0177777 sD0ES R4=177777 
1417 005370 001401 BEQ i$ sYES GO ON 
1418 sNO GO TO ERROR 
1419 005372 104001 ERROR +1 F 
1 74 005004 1$: CLR Ra 3R4=0 
1421 005376 020427 000000 CMP R4,00 sDOES R4=0 
1422 005402 001401 BEQ 2s sYES GO ON 
423 sNO GO TO ERROR 
1424 005404 1 ERROR +1 ;CPU ERROR 

005496 012704 125252 2s: MOV #125252 ,R4 3R4=125252 

1426 005412 020427 125252 CMP R4, 0125252 sDOES R4=125252 
1427 005416 001401 BEQ 3 sYES GO ON 

sNO GO TO ERROR 
1429 005420 194001 ERROR +1 ;CPU ERROR 
1430 005422 012704 052525 3%: MOV #52525 .R4 3R4252525 
1431 005426 020427 052525 R4, sD0ES R4=52525 
1432 005432 001401 BEQ 4% sYES GO ON 
1433 sNO GO TO ERROR 
1434 005434 104001 ERROR +1 s;CPu E 
on 005436 43: 

3 
1439 005436 GPRSTS 
1 F RS BIT TESTS ’ 
1441 005436 012705 177777 MOV 4177777,R5S 3R5°177777 
005442 020527 177777 CMP RS ,0177777 sD0ES R5*177777 

1443 005446 001401 BEQ 1$ :YES GO ON 

sNO GO TC ERROR 
1445 005450 104001 ERROR +1 sCPU E 
1446 005452 005005 1%: CLR RS 20 
1447 005454 020527 000000 CMP R500 sDOES R5=0 
1448 005460 001401 BEQ 2s sYES GO ON 
1449 sNO GO TO ERROR 
1450 005462 104001 ERROR +1 sCPU ERR 
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BASE INSTRUCTION SET TESTS 


012705 
62052 


125252 
125252 


052525 
052525 


177777 
177777 


001000 


000377 
000357 


177776 
000000 


177776 
177776 


177776 


177776 
177776 


177776 
177776 


2s: 


3%: 


1%: 


2s: 


18: 


2s: 


3 


19 
MOV #125252 ,R5 
CMP RS, #125252 
BEQ 
ERROR ol 
MOV #52525 .R5 
CMP RS, #52525 
BEQ 4s 
ERROR +1 


R6 BIT TESTS 
MOV 


177777 ,R6 
CMP R6,@177777 
BEQ 1$ 
ERROR +1 
CLR 
CMP R6, 00 
BEQ 2s 
ERROR +1 
MOV #125252 ,R6 
CMP R6,@ 
BEQ 3$ 
ERROR +1 
MOV #52525 .RE 
chp R6 , #52525 
BEQ &e 
ERROR +1 
MOV @STBOT RE 


PSW LOW BYTE BIT TESTS 


MOV 0377 ,@0177776 
CMP 0357 ,80177776 
BEQ 1% 

ERROR +) 

CLR 80177776 

CMP #0 ,86177776 
BEQ 2s 

ERROR +1 

MOV #105 ,80177776 
CMP #105 ,80177776 
BEQ 3% 

ERROR o1 

MOV 0252 ,80177776 
CMP 0252 ,80177776 
BEQ 43 


CPU 


sR6°177777 
sD0ES R6*177777 
YES GO ON 


3 
3NO GO TO ERROR 
ERROR 


sYES GO ON 
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SEQ 0038 
BASE INSTRUCTION SET TESTS 

1512 :NO GO TO ERROR 
1513 005672 104001 ERROR +1 ;CPU ERROR 
cas 005674 4$: 
1 
1525 005674 MSPO: 
1526 
1527 3 TEST SINGLE OPERAND INSTRUCTIONS- MODE 0 
1528 jf OCOSOSESHEEEEESEEESESEESEEEEESERESEESESSESEOSESEESESESEEEEEESES 

;THE INC, COM, CLR, AND DECREMENT INSTRUCTIONS ARE VERIFED. 
1529 005674 005004 CLR Ra ‘Sunn R4 WITH DATA 
1530 005676 005104 COM Ra 
1531 005700 005004 CLR Ra ‘ eTEST INSTRUCTION 
1532 005702 001401 BEQ 2s ;BRANCH IF R4 CLEARED 
1533 005704 104001 1%: ERROR ol 3;CPU ERROR 
1534 005706 005104 23: COM R4 s*TEST COMPLIMENT INSTRUCTION 
1535 005710 005204 INC R4 3*TEST er: INSTRUCTION 
1536 005712 001401 BEQ 4$ sBRANCH IF R4 
1537 ;COMPLIMENT OR “SNCREMENT FAILED 
1538 005714 104001 3%: ERROR +1 :CPU ERROR 
toes 005716 4$: 
1 3 
1544 005716 MSPB 

3 TEST SINGLE OPS - EVEN BYTE OF CLRB, DECB, AND COMB 
1547 005716 005004 CLR R4 
1548 005720 005104 COM Ra ;SETUP TEST REGISTER 
1549 005722 105004 CLRB R4 3*TEST CLEAR BYTE INSTRUCTION 
1550 005724 001401 BEQ 2s sBRANCH IF GOOD 
1551 sCLEAR EVEN BYTE FAILED 
1552 005726 104001 1%: ERROR ol sCPU 
1553 005730 105304 2s: DECB R4 s*TEST DECREMENT BYTE 
1554 005732 100002 BPL 3$ sDECREMENT BYTE FAILED 
1555 005734 105104 COMB R4 s*TEST COMPLIMENT BYTE 
1556 005736 001401 BEQ 4% sBRANCH IF GOOD 
1557 sCOMPLIMENT OR DECREMENT FAILED TO WORK 
1558 005740 104001 3%: ERROR +1 3;CPU ERROR 
cad 005742 4$: 
1 ; 
1564 005742 MSPC : 

3 TEST SINGLE OPS - MODE 1 CLRB, COMB, AND INCB 
1566 005742 005004 CLR R4 
1567 005744 005014 CLR CR4) 
1568 005746 005114 COM (R4) sSETUP TEST DATA 
1569 005750 005014 CLR (R4) s*@TEST INSTRUCTION 
1570 005752 001401 BEQ 2s sBRANCH IF GOOD 
1571 sMODE 1 FAILED 
1572 005754 104001 1%: ERROR ol sCPU ERROR 
1573 005756 005114 2s: COM (R4) s*TEST INSTRUCTION 
1574 005760 001403 BEQ 3$ 3(O)SHOULD = -1l 
1575 005762 100002 BPL 3% 3 
1576 005764 005214 Inc (R4) :¢TEST INSTRUCTION 
1577 005766 001401 BEQ 4% sBRANCH IF 
1578 3COM OR INC FAILED TO ALTER LOC O CORRECTLY 
£579 005770 104001 3%; ERROR +1 ;CPU ERROR 
1580 005772 43; 


—N3 
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BASE INSTRUCTION SET TESTS 
15861 
1562 
1585 005772 
1586 


18: 
2s: 


4s: 


MSPEO: 


1%: 


2s: 
38: 


My 4g — OPS MODE1-EVEN BYTE-CLRB,COMB, INCB 


(R4) 

(R4) sSETUP TEST DATA 
(R4) s*TEST INSTRUCTION 
(R4) s#TEST INSTRUCTION 
es BRANCH IF GOOD 

: oo (0) EVEN BYTE FAILED 
° ; 

(R4) s*#TEST INSTRUCTION 
+ ; TEST FLAGS 

(R4) s*#TEST INSTRUCTION 
(R4) 

(R4) 
4s sBRANCH IF GOOD 

sCOMB OR INCB FAILED 

+1 CPU ERROR 


ny oa OPS - OOD BYTE - CLRB, COMB, DECB 


(R4) 
(R4) ;SETUP TEST DATA 
R4 sPOINT TO OOD BYTE 
(R4) 3*TEST INSTRUCTION 
1% sBRANCH IF GOOD 

sCLEAR ODO BYTE FAILED 
+1 ;CPu 
R4 sPOINT TO EVEN BYTE 
(R4) 3LOC 0-1 0 
R4 sPOINT TO OOD BYTE 
(R4) 3*TEST INSTRUCTION 
(R4) sLOC O=-1 O 
. sBRANCH IF ERROR 

3 
(R4) 3*#TEST INSTRUCTION 
3$ sBRANCH IF 

sMODE 1, ODD BYTE FAILED 
+1 ;CPU ERROR 


TEST SINGLE OP - MODE 2 - CLR, COM, INC 
CLR Ra 


Ra 

Ra 3R42400 
(R4) :400=0 

(R4) 3400=-1 
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BASE INSTRUCTION SET TESTS 


005024 
1645 006106 001401 


--— - - ee —— --— a -_—- ~—- - ee _— 
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CLR (R4)> s@TEST INSTRUCTION 
BEQ 1% sBRANCH IF GOOD 
sMODE 2 CLEAR FAILED 
ERROR +1 sCPU ERROR 
18: DEC RS 
DEC RA 3R42400 
COM (R4)> s@TEST INSTRUCTION 
2s sBRANCH IF FAILURE 
DEC RE 
OEC RS 3R42400 
INC (R4)> s@TEST INSTRUCTION 
BEQ 38 sBRANCH IF GOOD 
sMODE 2 FAILURE 
He ERROR +1 :CPU ERROR 
3 
MSPG: 
3 TEST CLRB, COMB, DECB. MODE 2 - EVEN BYTE 
CLR RA 
COMB Ria 
INC R4 sR4°400 
CLR (R4) 
COM (R4) 1400--1 
CLRB (R4)> seTEST INSTRUCTION 
BEQ is sBRANCH IF GOOD 
sMODE 2 EVEN BYTE FAILED 
ol sCPU ERROR 


ERROR 
1%; OEC Ra 


OEcB (R4)> seTEST INSTRUCTION 
BPL 2s sBRANCH IF BAD 
DEC Ra sPOINT TO EVEN BYTE 
COMB (R4)- seTEST INSTRUCTION 
BEG 38 sBRANCH IF GOOD 
sMODE 2, EVEN BYTE FAILED 
es ERROR +1 3;CPU ERROR 
8 
MSPH : 
3 TEST CLRB. COMB. INCB MODE 2 - ODD BYTE 
CLR Ra 
COMB RS 
INC R4 3842400 
CLR (R4) 
COM (R4) 1400*-1 -1 
INC (R4) sPOIKT TO ODD BYTE 
CLRB (R4)- seTEST INSTRUCTION 
BEQ 16 sBRANCH IF GOOD 
sMODE 2,000 BYTE FAILED 
ERROR +1 :CPU ERROR 
1%: OEC Ra sPOINT TO OOO BYTE 
DEC Rea 
INCB (R4)> 3400-1 0 
Come (R4)- seTEST INSTRUCTION 


SEQ 0040 
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BASE INSTRUCTION SET TESTS 


1765 006344 


C4 
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SEQ 0041 
BPL 23 sBRANCH IF MODE 2 FAILED 
OEC RG ;POINT TO OOO BYTE 
INCB (R4)> 
BEQ 3% sBRANCH IF GOOD 
sMODE 2,000 BYTE FAILED 
., ERROR ol s;CPU ERROR 
F 
MSPI: 
CLR aa ‘ 
CLR (R4) 30°0 
Cons (R4) 
INC (R4) 302400 
CLR O(R4)- seTEST INSTRUCTION 
BEG 1$ sGRANCH IF GOOD 
sMODE 3 FAILED, 400 SHOULD=-0 
ERROR ol sCPuU ERROR 
1%: OEC Fea 
OEC Ra R420 
COM ORE). ;eTEST INSTRUCTION 
6PL 2s sBRANCH IF BAD 
DEC Ra 
OEC sREPOSITION POINTER 
INC OCR4G)- s@TEST INSTRUCTION 
BEQ $ sBRANCH IF 
sMODE 3 FAILED 
- ERROR ol 3sCPU ERROR 
3 
MSP J: 
3 TEST CLRB, COMB, INCB - MONE 3, EVEN/ODD BYTE 
CLR Ra 3Ra20 
CLR Ri 
coms Ri 
INC 3R1*400 
CLR (R1) 
COM (R1)- 3400=-1 
CLR (R1) ’ 
Come (R1) :402°C00 377 
CLR (R4) s 
COMB (R4) 
INC (R4) 0400 
CLRB QC R4)> rest INSTRUCTION 4002377 000 
BEQ 1% sQRANCH IF MODE 3 EVEN BYTE CLEARED 
s TEST INSTRUCTION FAILED 
ERROR ol sCPU ERROR 
1%: —s R4 sREPOSTION POINTER 
ae RA De se¢TEST INSTRUCTION 
DEC Ra sREPOSITION POINTER 
INCB @(R4)> seTEST INSTRUCTION 


—————e waa nae 
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BASE INSTRUCTION SET TESTS 


001401 


4$: 
5%: 


6%: 
78%: 


D4 
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BEQ 3% 

ol 
DEL RS 
OEC RA 
INC (R4) 
INCB O(R4)- 

43 
DEC BA 
DEC Re 
CLRB OC R4)> 
BEQ 53 

ol 
DEC Ra 
DEC 

OC R4)> 
DEC 
DEC Ra 

QC R4)+ 
BEQ 7% 
ERROR ol 


TEST CLR, COM, DEC - MODE 4 
CLR 


RA 
COMB RS 
INC R4 
CLR (R4) 
COM CR4)> 
CLR (R4) 
INC (R4)o 
CLR -(R4) 
BEQ 1% 

ol 
OEC -(R4) 
COM (R4) 
BES 2s 
BMI 2s 
INC R4 
INC Ra 
DEC -(R4) 
BEQ 3$ 
ERROR ol 


CLR Ra 


SEQ 0042 


;BRANCH IF GOOD 
sMODE 3, EVEN BYTE FAILED 
3CPU ERROR 


sBRANCH IF 402 NEQ O 


3842401 
340120 


sBRANCH IF GOOD 
3000 BYTE FAILED 
sCPU ERROR 


3R42401 
3403377 


3R4°401 

s@TEST INSTRUCTION 
| 
| 


s*TEST INSTRUCTION 
sBRANCH IF GOOD 

sMODES ODO BYTE FAILED. 
sCPU ERROR 


3R4*400 


é 
34002-1 
3 


3402°1 
s@TEST INSTRUCTION 
sBRANCH IF GOOD 
sMODE 4 FAILED 


r 
s@TEST INSTRUCTION 400=-2 
340021 

sBRANCH IF BAD 

sBRANCH IF BAD 


3R42400 
3¢TEST INSTRUCTION 
sBRANCH IF GOOD 
sMODE 4 FAILED 
3CPU ERROR 


MODE 4, ODD BYTE 


Eq 
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BASE INSTRUCTION SET TESTS 


105104 
005204 


005044 
105114 
24 


18: 
2s: 


1%; 


2s: 
3%: 


F 
MSPO: 


TEST CLR, COM, INC - MODE 5 
® Ra 


SEQ 0043 


¢ 
3R42400 
337620 


33762001 000 

340021 

3842403 

sane "5 CLEAR OOD BYTE (401) 


s 
sMODE 4 BYTE FAILED 
sCPU ERROR 


3R42403 
3 TEST INST. 401377 


3s TEST INST. 401*0 

sBRANCH IF 

sMODE 4 ODD BYTE FAILED 
ERROR 


sCPU 

3@TEST INST. 

sBRANCH IF GOOD 

sMODE 4 DECREMENT OCD BYTE FAILED 
3CPU ERROR 


30=400 

s*TEST INST. 400-0 
sBRANCH IF GOOD 
sMODE 5S FAILED 
sCPU ERROR 


sRESET POINTER TO 0 
s*TEST INST. 376°1 
sBRANCH IF BAD 


sREPOSITION POINTER 
s*TEST INST. 3760 


»*TEST INST. ,400= 0 376 
sBRANCH IF GOOD 

sMODE 5S FAILED 

;CPU ERROR 


2 


FQ 
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SEQ 0044 
BASE INSTRUCTION SET TESTS 
| 
' TEST NEG MODE 5 | 
1889 006610 CLR R4 | 
1890 006612 105104 COMB saRG 
1891 006614 INC R4 ;R4=400 
1892 006616 CLR Ri 
1893 006620 105101 COMBOséRkI 
1894 006622 00530 DEC Ri 3R1*376 
1895 006624 005002 CLR R2 ;R2*0 
18% 006626 005012 CLR (R2) 3020 
1897 006630 005014 CLR (R4) ; 
1898 005114 COM (R4) 3400*-1 
1899 006634 005011 CLR (R1) 33760 
1900 006636 005454 NEG @-(R4) :0°0 
1901 006640 001401 BEQ 2% sBRANCH IF GOOD 
1902 sNEG FAILED 
1903 006642 104001 18: ERROR +1 ; 
1904 006644 005334 2%: DEC @(R4)> 30°-1 
1905 006646 005454 NEG @-(R4) 30°1 
1906 006650 001403 BEQ rT} sBRANCH IF BAD 
1907 006652 102402 BvS xy sBRANCH IF BAD 
1908 006654 100401 BMI 3$ sBRANCH IF BAD 
1909 006656 103401 BCS as sBRANCH IF GOOD 
1910 sNES FAILED 
1911 006660 104001 38: ERROR 1 sCPU ERROR 
1912 006662 005334 4%: DEC @(R4)+ ; TEST RESULT OF NEGATE 
1913 006664 001401 BEQ bs sBRANCH IF 
1914 sRESULT OF NEGATE BAD | 
1915 006666 104001 S$: ERROR 1 sCPU ERROR , 
1916 006670 105212 6% INCB = (R2) 301 
1917 006672 005454 NEG @-(R4) 30*-1 
1918 006674 001403 BEQ 7% j 
1919 006676 BVS 7$ 
1920 006700 103001 Bcc 7$ ; ’ 
1921 006702 100401 BMI 8s sBRANCH IF GOOD 
1922 sBAD NEGATE 
1923 006704 104001 7% ERROR +1 :CPU ERROR 
1924 006706 105212 8s INCB = (R2) 30*0 
1925 006710 001401 BEQ 108 sBRANCH IF GOOD 
1926 006712 104001 $: ERROR +i :CPU ERROR 
1927 006714 108: 
1928 
1929 : 
1931 
1933 006714 MSPP 
1934 
1935 P TEST CLR, COM, INC - MODE 6 
1936 006714 005004 CLR Re 
1937 006716 005204 INC RS 
1938 006720 005204 INC R4 ;R4=2 
1939 006722 005001 CLR Ri 
1940 006724 105101 COMB OCR 
1941 006726 005201 INC R1 ;R1=400 
1942 006730 005011 CLR (R1) ' 
1943 006732 005121 COM (R1)> 3400=-1 
1944 006734 005011 CLR (R1) 3R1°402 
1945 006736 005211 INC (R1) :402°1 


1946 006740 005002 CLR Re sR2*0 


000376 
000376 
000400 


000400 
000400 


177776 


000374 


1%: 
2s: 


3%: 
4%: 


5%: 


6%: 
7: 


CL 1 
CLR Ra 
COMB R4 
INC Ra 
CLR (R4) 
COM (R4) 
CLR -(R4) 
CLR -(R4) 
INC (R4)+ 
NEG 2(R4) 
BEQ 1$ 
BvS 16 
BMI Le 
Bcs 2s 
ERROR +1 
DEC 2cra) 
BEQ 4% 
ERROR +1 
NEG oC R4) 
BEQ S$ 
ERROR + 
NEGB 374(R1) 
BvVS 6% 
BEQ 6% 
BPL 6% 
BCS 7$ 
ERROR + 
INCB 374(R1) 
BEQ 


G4 
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BASE INSTRUCTION SET TESTS 


SEQ 0045 


sBRANCH IF 
sMODE 6 FATLED 


sBRANCH IF 
sINC MODE 6 FAILED 
;CPU ERROR 


3R1*0 


3R4*400 


3 
3400--1 
337620 


3 
3374*1 R4*376 
3400=1 

sNEGATE FAILED 


sBRANCH IF 

sNEGATE FAILED 

3:CPU ERROR 

3s TEST RESULT OF NEGATE 

sBRANCH IF 

sRESULT OF NEGATE FAILED 
ERROR 


i 
32020 


3 BRANCH IF 
sNEGATE FAILED 
3 ERROR 
337420 377 

’ 


;BRANCH IF GOOD 
sNEGATE FAILED 
CPU E 
337420 
sBRANCH IF GOOD 


H4 
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SEQ 0046 
BASE INSTRUCTION SET TESTS 
2006 ;NEGATE FAILED 
2007 007116 104001 8$: ERROR +1 ;CPU ERROR 
2008 007120 94: 
2009 
2010 3 | 
2018 007120 MSPR 
5015 , TEST CLR, COM, INC - MODE 7 | 
2016 007120 005001 CLR R1 3R120 
2017 007122 005004 CLR Ra ' | 
2018 007124 105104 COMB RG , 
2019 007126 005204 INC Ra ;R42400 
2020 007130 005011 CLR (R1) 
2021 007132 105111 coma 42s (R21) | 
007134 005211 INC (Ri) 
2023 007136 005211 INC (R1) 
2024 007140 005211 (Ri) 330°402 | 
2025 007142 005014 CLR cra) 340020 
2026 007144 005064 000002 CLR 2cra) ’ 
2027 007150 005164 000002 COM 2(r4) 3402*-1 
2028 007154 005074 177400 CLR 8-400(R4) 340220 
2029 007160 001401 BEQ 2% sBRANCH IF GOOD 
2030 007162 104001 18: ERROR +1 , 
2031 s INSTRUCTION FAILED 
2032 007164 005171 000000 2%: com @0(R1) 3402*-1 
2033 007170 100401 BMI as sBRANCH IF GOOD 
2034 007172 104001 38: ERROR +1 ;CPU ERROR 
2036 007174 005104 as com 4 
2037 007176 005274 000401 @401(R4) 3402*0 
20 7 001401 BEQ $ :BRANCH IF GOOD 
2039 007204 104001 S$ ERROR 1 :CPU E 
2040 ;MODE 7 FAILED 
2041 007206 6: 
2042 
2043 : 
2046 007206 MSPS 
2047 
2048 : TEST NEG MODE 7 
2049 007206 R Ra 
007210 005014 CLR (R4) 3020 
2051 007212 CLR , 
007214 105102 come =O 
2053 007216 INC 3R2=400 
2054 007220 005012 CLR (R2) 340020 
2055 007222 005472 177400 NEG @-400(R2) sNEG OF 0=0 
2056 007226 103401 Bcs 1s ;eees 
2057 007230 001401 BEQ 2% ;BRANCH IF GOOD 
2058 007232 104001 16: ERROR +1 sCPU 
2059 t 
2060 007234 005314 2$: DEC R4 30*-1 
2061 007236 005474 000400 NEG @+400(R4) :0°1 
2062 007242 001403 BEQ 3 sBRANCH IF ERROR 
2063 007244 102402 BvS 34 , 
2064 007246 100401 BMI 3% ' 
2065 007250 103401 acs as :BRANCH IF GOOD 


2066 007252 104001 38; ERROR +1 sCPU ERROR 


2067 
007254 


2073 007254 


2s: 
3%: 


18: 
2%: 


4%: 


MSPVO: 


1%; 
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BASE INSTRUCTION SET TESTS 


sNEGATE MODE 7 FAILED 


TEST SINGLE OPERAND MODE 2 REG 7 
CLR Ra 


COMB R4 
INC R4 3R42400 
CLR (R7)o s;CLEAR NEXT LOCATION 
-WORD -l sSETUP INITIAL DATA 
BEQ 3% s;BRANCH IF GOOD 
ERROR +1 s;CPU ERROR 
TEST TST MODE 0 
CLR Aa 3R420 
scc sCONDITION CODES =1111 
CLZ 3CC=1011 
TST RG 3*TEST INSTRUCTION 
Bcs 1s 
BvS is 

1% sBRANCH IF ERROR 
BEG 2s sBRANCH IF GOOD 
ERROR o1 3CPU ERROR 

sTST MODE O FAILED 

DEC RA 3R42-1 
scc 
CLN 3CC*0111 
TST Ra s*TEST INSTRUCTION MODE O 
eBcs 3% sBRANCH IF ERROR 
BvS 3% 
BEQ 3% 
BMI 4s sBRANCH IF GOOD 
ERROR +1 


sCPU ERROR 
:TST FAILED 


COMB R4 302000 377 

scc 

CLN 3CC#0111 

TSTB R4 3*¢TEST INSTRUCTION ON EVEN BYTE 
BvVS 1% sBRANCH IF ERROR 

Bcs 1% 3 

BvS 1s ’ 

BMI es s;BRANCH IF GOOD 

ERROR +1 ;CPU ERROR 


——— —— a a ee eee Se -_—_——_——_ 
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SEQ 0048 

BASE INSTRUCTION SET TESTS . o 

2130 3 

2131 007362 005204 2s: INC R4 sPCINT TO 1 

2132 007364 105704 TST8 R4 s TEST INSTRUCTION 

2133 007366 001401 BEQ 43 sBRANCH IF GOND 

2134 007370 104001 3$: ERROR 1 ;CPU ERROR 

2135 sTST FAILED ON BYTE 

2136 007372 4$: 

213 

2138 3 

2141 007372 MSPV 

2142 

2143 3 TEST TST MODE 1 

2144 007372 005004 

2145 007374 005014 CLR (R4) 3020 

2146 007376 000277 scc 

2147 007400 000244 CLZ 3CC*1011 

2148 007402 005714 TST (R4) 3*#TEST INSTRUCTION IN MODE 1 

2149 007404 103403 BcSs 13 sB8RANCH IF ERROR 

2150 007406 102402 BvVS 1% 

2151 007410 100401 BMI i$ 3 

2152 007412 001401 BEQ 2s sBRANCH IF GOOD 

ty 007414 104001 1%: ERROR +1 ;CPU ERROR 

2155 007416 005214 2s: INC (R4) 3071 

2156 007420 000277 scc 

2157 007422 005714 TST CR4) 3; TEST a 

2158 007424 001403 BEQ 3$ ;BRANCH IF 

2159 007426 i BVS 3% 

2160 007430 103401 6CcS 3% 

2161 007432 100001 BPL 4$ sBRANCH IF GOOD 

2162 007434 104001 3%: ERROR +1 ;CPU ERROR 

2163 iTST FAILED MODE 1 

2164 007436 AS 

216 

21 3 

444 007436 MSPX 

2171 F TEST TST MODE 1 BYTE 

2172 007436 005004 CLR R4 3R4=20 

2173 007440 005014 CLR CR4) 

2174 007442 105114 COMB (R4) 

2175 007444 005214 INC (R4) 302001 000 

2176 007446 000277 scc 

2177 007450 000244 CLZ 3CC=1011 

2178 007452 105714 TSTB (R4) 3#TEST INTRUCTION 

2179 007454 103403 Bcs 1$ sBRANCH IF ERROR 

21860 007456 102402 BVS 1$ 8 

2181 007460 100401 BMI 1s 

2162 007462 001401 BEQ 2s sBRANCH IF GOOD 

mes 007464 104001 1%: ERROR ol sCPU ERROR 

2185 007466 005204 2s: INC Ra 3R421 

2186 007470 000277 scc 

2187 007472 105714 TSTB (R4) s TEST INSTRUCTION 

2188 007474 001403 BEQ 3% sBRANCH IF ERROR 
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BASE INSTRUCTION SET TESTS 


2191 007502 
2192 007504 


2194 007506 


103001 
104001 


3%: 


18: 
2s: 


BCC 
ERROR 


4% 
+1 


TEST TST MODE 2 
R Ra 


; 
3CC=1011 


2 BYTE 


b 

3020 
s27-1 
3R4=0 


s TEST INSTRUCTION 
sBRANCH IF ERROR 


sBRANCH IF GOOD 
;CPU ERROR 
sMODE 2 TEST FAILED 
sTST LOC2 


;CPU ERROR 
s;MODE 2 FAILED 


3 
30*377 000 
3R420 


:CC=1011 
; 
sBRANCH IF ERROR 


sBRANCH IF GOOD 

;CPU ERROR 

sMODE 2 EVEN BYTE FAILED 
sCC#0111 





—— pea er 
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BASE INSTRUCTION SET TESTS 


2253 007624 4$: 
Hy 
2258 007624 MSPAA 
8 TEST TST MODE 3 
2261 007624 CLR R4 
2262 007626 005014 CLR CR4) 
2263 007630 105114 COMB (R4) 
2264 007632 005214 INC (R4) 30*400 
2265 007634 005034 CLR @CR4)>+ 340020 
00 CLR 3R420 
2267 007640 000277 scc 
2268 00 CLZ 3CC*1011 
2269 007644 005734 TST OCR4)> 3; TEST MODE 3 
2270 007646 1034035 BcSs 1$ sBRANCH IF ERROR 
2271 007650 102402 BVS 1$ 3 
2272 007652 100401 BMI 1% 
2273 007654 001401 BEQ 2st sBRANCH IF GOOD 
2274 007656 104001 1%: ERROR o1 sCPU ERROR 
2275 sMODE 3 FAILED 
2276 007660 005304 2s: DEC R4 
2277 007662 005304 DEC R4 3R420 
2278 007664 0053534 DEC @(R4)+ 3400=-1 
2279 007666 005004 CLR 4 
2280 007670 000277 scc 
2281 007672 CLN 3CC=0111 
007674 005734 TST OC(R4)+ 3: TEST INSTRUCTION 
2283 007676 103403 6cs 3% 3 
22864 007700 001402 BEQ 3% sBRANCH IF ERROR 
2285 007 102401 BvS 3% 3 
2286 007704 100401 BMI 4s ;BRANCH IF GOOD 
2287 sERROR MODE 3 
2288 007706 104001 3%: ERROR ol 3CPU ERROR 
2289 007710 4$: 
2290 
2291 3 
2294 007710 MSPBB : 
5 TEST TST MODE 3 AUTO-INC 
2297 007710 005004 CLR Ra 
2298 007712 005014 CLR (R4) 3020 
007714 105114 COMB (R4) 
2300 007716 005214 INC (R4) 302400 
2301 007720 005001 CLR Ri 
2302 007722 105101 COMB R1 
2303 007724 005201 INC R1 3R1=400 
007726 005011 CLR CR1) 340020 
2305 007730 000277 scc 
2306 007732 005734 TST O(R4)+ 34002 
2307 007734 103403 BcS 1% sERROR IF CARRY 
2306 007736 102402 BvS 1$ sERROR IF OVERFLOW 
2309 007740 100401 BMI 1$ sERROR IF MINUS 
2310 007742 001401 BEQ 2s sERROR IF NOT EQUAL 
104001 1%: ERROR o1 


2311 007744 
2312 


sMODE 2 OOD BYTE FAILED 


:CPU ERROR 
:CC SHOULD = 0100 








M4 
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SEQ 0051 
BASE INSTRUCTION SET TESTS 
| 
2313 007746 005304 2s: DEC R4 
2314 007750 005504 DEC R4 
2315 007752 005704 TST R4 ;SEE IF —_ INC WORKED 
2316 007754 001401 BEQ 4$ ;ERROR IF R4 NE O 
2317 007756 104001 3%: ERROR +1 ;CPU ERROR 
2318 ;AUTO-INC FIALED 
2319 007760 4$: 
2320 
2321 
2324 007760 MSTB3 
2325 
2326 F TEST TST MODE 3 BYTE 
2327 007760 005004 CLR Ra 
2326 007762 005014 CLR (R4) 
2329 007764 105114 COMB R4) 
2330 007766 005214 INC (R4) 
2331 007770 005214 INC (R4) 30*4013 
2332 007772 1 CLR R1 
2333 007774 105101 COMB R1 
2334 007776 005201 INC Ri 3R1=400 
2335 010000 005011 CLR (Ri) 
2336 010002 005111 COM (R1) . 
2337 010004 105011 CLRB CR1) 3400*377 000 
2338 010006 105734 TSTB QCR4)- 3ee TEST INSTRUCTION 
2339 010010 001405 BEQ 1% sERROR IF EQUAL 
2340 010012 103402 6cs 1% sERROR IF CARRY SET 
2341 010014 102401 BYvS 1$ sERROR IR OVERFLOW 
342 010016 100401 I 2s ;BRANCH 
2343 010020 104001 1s + F 
;CC ERROR 
2345 010022 005304 2s OEC Ra 
2346 010024 005304 DEC fa 
2347 010026 001401 BEQ 4% ;BRANCH IF AUTO-INC WORKED 
2348 010030 104001 38: ERROR 1 3;CPU 
2349 sAUTO-INC FAILED 
2350 010032 4$ 
2351 
2352 
oan 010032 MST4 
2357 : TEST 1ST MODE 4 
2358 010032 005004 CLR Ra 
2359 010034 005014 CLR (R4) 3020 
2360 010036 005204 INC Ra 
2361 010040 005204 INC Ra 3R422 
2362 010042 000277 scc 
2363 010044 000244 CLZ 3CC*1011 
2364 010046 005744 TST -(R4) 3;eeTEST pee 
2365 010050 103403 Bcs 1$ s;ERROR IF CARR i 
2366 010052 102402 BVS 1$ TERROR IF OVERFLOW 
2367 010054 100401 BMI 1s s;ERROR IF MINUS 
2368 010056 001401 BEQ 2s ;BRANCH IF GOOD 
2369 010060 104001 1%: ERROR 1 ;CPU ERROR 
2370 ;CC WRONG 
2371 010062 005704 2s: TST R4 s INSURE CORRECT AUTO-DEC 
2372 010064 001401 BEQ 4s sBRANCH IF GOOD AUTO-DEC 
2373 3BAD AUTO-DEC 





2377 
2381 
2382 


24 1 
2435 010172 
2436 010174 


104001 


3%: 
4$: 


; 
MST4B: 


N4 
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BASE INSTRUCTION SET TESTS 


ERROR +1 


TEST TST MODE 4 BYTE 
CLR R4 


CLR (R4) 
COM (R4) 
COMB (R4) 
SCC 

INC R4 
INC 

TSTB -(R4) 
BEQ 

BCS 1$ 
BVS 1s 
BMI es 
ERROR +1 
TSTB -(R4) 
BEQ as 
ERROR +1 


TEST TST MODE 5S 
CLR Ra 


CLR (R4)+ 
Scc 
CLZ 
TST @-(R4) 
BCS 1$ 
BvS 1$ 
BMI 1$ 
BEQ es 

+1 
TST R 
BEQ 4% 
ERROR +1 


TEST TST MODE 5S BYTE 
cL Ra 


R 
CLR R4) 
COMB (R4) 
INC (R4) 
CLR OC R4)- 


cm es 


;CPU ERROR 


30*377 000 


pRA22 
3eeTEST a egy 
ERROR EQUAL T 


sCPU 
3CC SHOULD EQUAL 


0100 
s*eTEST a BYTE 
sBRANCH IF GOOD 


:CPU ERROR 
;CC SHOULD EQUAL 0100 AND R4=-1 


: 
3020, R4=2 


3CC=1011 
; TEST ye 


;CPU ERROR 
sCC WRONG, SHOULD = 0100 
:;BRANCH IF AUTO-DEC WORKED 
;CPU ERROR 
sAUTO-DEC FAILED 


302400 
340020, R4=2 
3 





— ee ee ee ne ee se - —_—— --— - _ 
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BASE INSTRUCTION SET TESTS 


SEQ 0053 


2437 010176 105134 ara). 1400377 000 R4=2 
2438 010200 105754 TSTB =s_-@- (RA) seeTEST INSTRUCTION 
2439 010202 103403 8cs 18 sERROR IF CARRY 
01 100402 BMI i$ ;ERROR 
2441 010206 102401 BvS 18 sERROR IF OVERFLOW 
2442 010210 001401 REQ 2 sBRANCH IF GOOD 
2443 010212 104001 18: ol :CPU ERROR 
sCC SHOULD = 0100 
2445 010214 005224 2%: (R4)> :0°401 
2445 010216 105754 TSTB 3s @-(R4) ;eeTEST INSTRUCTION 
2447 010220 100401 as :@RANCH IF GOOD 
SEVEN BYTE FAILURE 
2449 010222 104001 34: ERROR +1 :CPU ERROR 
2450 010224 as: 
2451 
2s 3 
243s 010224 MST6 
2457 ; TEST TST MODE 6 
2458 010224 005004 
2459 010226 005014 CLR (Ra) :0°0 
2460 010230 105104 Com RA 
2461 010232 INC Ra 1R4°400 
2462 010234 005014 CLR (Ra) 
2463 010236 005114 rete a (Ra) 1400*-1 
2464 010240 005764 177400 TST -400(R4) jeeTEST LOCATION 0 
2465 010244 103403 acs 18 sERROR IF CARR 
2466 010246 102402 evs 18 sERROR IF OVERFLOW 
7 010250 100401 BMI 18 sERROR IF MINUS 
2468 010252 001401 BEQ 2¢ SBRANCH IF ZERO 
2469 010254 104001 18: ° :CPU ERROR 
2470 1CC ARE WRONG 
2471 010256 2s: CLR Ra ; 
2472 010260 005764 000400 TST 400(R4) sTST LOCATION 400 
2473 010264 001401 BEQ 38 1ERROR IF EQUAL 
2474 O1 100401 BNI as 1ORANCH IF MINUS 
2475 010270 104001 38: ERROR +1 ;CPU ERROR 
2476 :CC ERROR 
2477 010272 4s: 
2478 
2479 , 
2482 010272 MST? 
2483 
2464 : TEST TST MODE 7 
2485 010272 005004 CLR Ra 
2486 010274 005014 CLR (Ra) 
2487 010276 005124 CoM (R4)> :0*-1 
010300 005014 CLR (Ra) 12°0 
010302 CLR R2 R20 
2490 010304 CLR Ra 
2491 010306 105104 COMB ORG 
2492 010310 INC 1R4*400 
2493 010312 005014 CLA (Ra) 1400°0 
2494 010314 005774 177402 TST @-376(Ra) seeTEST LOCATION 0 
2495 O1 103403 acs 18 sERROR IF CARRY 
24% 010322 102402 BVS 18 ;ERROR IF OVERFLOW 
2497 010324 -001401 BEQ 18 ;ERROR IF ZERO 


2498 010326 
2499 010330 


2500 
2501 010332 
334 


010366 
2531 010370 
32 
3 
7. 010372 


010372 
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1/1 /402 


MACRO 41200 


CS 
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BMI 2s sBRANCH IF GOOD 
ERROR +1 
sERROR IN CC 
INC (R2)> s0*-2 R2e2 
TST @-376(R4) see CHECK = A at OF LOCATION 2 
BMI 38 sERROR IF 
BEQ 46 sBRANCH IF "GOOD 
ERROR +1 sCPU ERROR 


3CC SHOULD = 0100 


_SBTTL eeccecseeces DOUBLE OPERAND TESTS seccececsecccocece 


MDMO : 


18: 
2s: 


TEST MOVE MODE 0 
CL Ra 


R 3R420 
CLR Ri 
COM R1 sRie-1 
MOV R1,R4 seeTEST MOVE INSTRUCTION 
BES 18 sERROR IF R420 
BvS 18 sERROR IF OBERFLOW 
BMI 2s sBRANCH IF MINUS 
ERROR ol sCPU ERROR 

sCC SHOULD = 100-, R4 SHOULD=--1 

INC fi 3sR4 SHOULD =-0 
BNE 18 sERROR IF R4 NE O 


CLR R420 
CLR R1 
COM Ri sRl°-1 
ADO R1,R4 see TEST ADD OF R1 TO R4 
BEQ is sERROR IF ZERO 
6cs 16 sERROR IF CARRY 
6vs is sERROR IF OVERFLOW 
BMI 2s sBRANCH IF MINUS 
ERROR ol sCPU ERROR 

3CC SHOULD = 1000 , R4=-1 
INC ae 3R4 SHOULD =0 
BEQ 4s sBRANCH IF R4*0 
ERROR +1 CPu ERROR 


ry 
384 SHOULD = O 


TEST SUB MODE 0 


SEQ 0054 


DS 
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2561 010422 0605004 CLR Ra 

2562 010424 005001 CLR R1 

2564 010430 160104 SUB R1,R4 seeTEST OF R4-R1, R4=-1 
2565 010432 1024035 BvS 1% sERROR IF v SET 

2566 010434 103002 BCC 1$ sERROR IF NO CARRY 
2567 010436 001401 BEQ 1% 3 IF «0 

2568 010440 100401 BMI rd) sBRANCH IF MINUS 
2569 010442 104001 18: ERROR ol sCPU ERROR 

2570 eC eae * 1001 

2571 010444 005101 2s: COM wy Riel 

2572 010446 005201 INC R1 1GET TWO’S COMPLIMENT, R1=-1 
2573 010450 160104 SUB R1,R4 s@eTEST R4-R1 (1- 1s 6 
2574 010452 001401 BEQ 43 sBRANCH IF ZERO 
2575 010454 104001 3%: ERROR ol sCPU ERROR 

2576 3CC SHOULD = 0100 

2577 010456 &$ 

2578 

2579 3 

2582 010456 MOM27 

2583 

ORE 3 TEST MOV MODE 27,00 

2585 010456 000257 ccc sCC=0000 

2586 010460 012704 125252 MOV #125252 ,R4 seeTEST MOVE 

2587 010464 001401 BEQ 1s sERROR IF = 0 

2588 010466 100401 6nI 2s sBRANCH IF MINUS 
2589 010470 104001 1$ ERROR +1 :CPU ERROR 

2590 3CC SHOULD = 1000 

2591 010472 012701 052525 2s MOV 0052525 ,,.R1 seeTEST MOVE 

2592 010476 100401 BMI 38 sERROR IF MINUS 
2593 010500 001001 BNE 4S sBRANCH IF NE O 
2594 010502 104001 38 ERROR +1 3:CPU ERROR 

2595 3CC SHOULD = 0000 

2596 010504 060104 4$: ADD R1,R4 sR1oR4=-1 

2597 010506 100401 BMI 6% sBRANCH IF MINUS 
2596 010510 104001 5% ERROR o1 sCPU ERROR 

2599 3sMOV FAILED 

2600 010512 005204 6%: INC R4 3R4+1"0 

2601 010514 001575 BNE S$ sERROR IF NOT ZERO 
2603 

2606 010516 MBIOO 

2607 

2606 $ TEST BIC, BIS MODE 0,0 

2609 010516 005004 

2610 010520 005104 COM Re R4=-1 

2611 010522 012701 125252 MOV #125252 ,,R1 1 SETUP Ri TEST DATA 
2612 010526 012702 052525 MOV 0052525 ,R2 sR2°COMPLIMENT OF R1 
26135 010532 000261 SEC 

2614 010534 040104 BIC R1,R4 seeTEST BIC WITH CARRY SET 
2615 010536 103003 Bcc 1% sERROR IF NO CARRY 
2616 010540 102402 6vVS i$ sERROR IF OVERFLOW 
2617 010542 001401 Q 1% sERROR IF 

2618 010544 100001 BPL es sBRANCH IF PLUS 
2619 010546 104001 18; ERROR ol :CPU ERROR 

2620 :CC SHOULD = 0001 

2621 010550 020402 2; CMP R422 sCOMPARE CONTENTS OF R4& AND R2 


SEQ 0055 


268 
2682 010702 


3%: 
4s: 


5$: 
68: 


TEST BIT, CP MODE 0,0 
MOV #125252 ,.R1 


MOV 
MOV 
BIT 
BEQ 
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@100000 ;R4 


sBRANCH IF EQUAL 
sCPU ERROR 
sR4 AND y As EQUAL 
t = 
sBIS 052525 AND 125251*177775 
sBRANCH IF MIUS VALUE 


sCPU ERROR 
sBAD BIS OPERATION 


sR1*0 
sERROR IF NE O 


3R1°125252 
3R42100000 
sR2°052525 

seeTEST OF BIT .CC=1000 
sERROR IF EQ O 

sBRANCH IF GOOD 


sCPU ERROR 

sCC SHOULD = 1000 
s*TEST 100000-125252*25252 
sERROR IF EQUAL O 


sERROR IF CARRY CLEARED 
sBRANCH IF GOOD 


;CPU ERROR 

3CC SHOULD +0001 
R421 
sR4*¢ RL = 2 
sBRANCH IF GOOD 


:CPU ERROR 
3CC SHOULD = 0101 


TEST MOV, MOVB MODE 1,1 AND SIGN EXT ON MOVB TO GPR 
MOV #400 #400 


»R4 3R4 
eR1 3R1*402 
(R4) 1 
(R4) 3400=-1 
(R1) H 
(R1) 1402=000 377 


SEQ 0056 


Shy 010770 


12 
2713 010772 
2714 010774 


1 
2742 011032 
2743 011036 


012704 
012701 
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000405 


177777 


177753 
000024 


000400 
000404 


18: 
2s: 


3%: 
43; 


BNE 3$ sERROR IF 405 NOT O 
3 CHECK _— SIGN EXTENSION OCCURS ON A ee TO a REGISTER. 


5$: 
6%: 


1%: 
2s: 


TEST 
MOV 
MOV 


Re 
#405 ,R3 
— 


(R2) 
3% 
(R1),CR3) 
(R3) 


(R1),R2 
S$ 
S$ 


S$ 
@177777,R2 
6$ 


SUB MODE 1,1 
#400 ,R4 
0404 ,R1 


a 
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sMOV 400 10 0 ,0=-1 


sERROR IF O 


sERROR IF OVERFLOW 
sERROR IF NO CARRY 


sBRANCH IF GOOD 


CPU 
3CC SHOULD ©1001 
0=0 


3 s 
sERROR IF NOT O 
3CC=0000 


340520 


0 R2- 
sERROR! BIT 15 gas SET. 


sV BIT SHOULD BE CLE 


9) 
sCARRY BIT SHOULD BE UNAFFECTED 


sTEST R2 


sSIGN EXTENDED THROUGH UPPER A sd 
sERROR! BYTE SHOULD HA 
3SIGN EXTENDED THROUGH VUPPER BYTE 


IF CARR 
te IF POSITIVE RESULT 


s-lel 
tadadon IF GOOD 
RROR 


:CPU E 
3CC SHOULD = 1000 


3R4=400 
3R1*404 


SEQ 0057 





+s ae 
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011066 


011076 


012714 000003 
012711 000006 
000277 


161411 
001375 


021411 


1$: 
23: 


16: 
23: 


MOV @3,(R4) 34003 
MOV 6,(R1) 3406°6 
scc sCC#1111 
SUB (R4),(R1) 36-393 
BEQ 1$ sERROR IF O 
BMI 1% sERROR IF MINUS 
BCC 2s sBRANCH IF GOOD 
ERROR +1 ERROR 

D = 0000 


3CC SHOUL 
SUB -  (R4),(R1) 33-320 
1s sERROR IF NOT O 


TEST BIC, BIS MODE 1,1 
MOV #400 ,R4 sR42400 


MOV €402,R1 3R1=402 
0052525. (R4) 34002052525 
nov #125252 ,(R1) 3402°125252 
BIS (R4),(R1) sRAVRIL = -1 
BEQ 1$ 3 0 
BMI 2s sBRANCH IF GOOD 
ERROR «¢ sCPU ERROR 
C SHOULD = 1000 
INC (R1) 3402*0 
BEQ a s@RANCH IF GOOD 
ol 3CPU 
sCC SHOULD = 0100 
DEC 3402=-1 
BIC (R4),(R1) 3R1*125252 
BEQ sERROR IF 
BMI 6% sBRANCH IF GOOD 
ERROR 1 3 
sCC SHOULD = 1000 
3 om 
BIC (R1),(R4) 340020 
BEQ sBRANCH IF GOOD 
ERROR +1 E 


3CPU ERROR 
3CC SHOULD = 0100 


TEST BIT, CMP MODE 1,1 
MOV 


#400 ,R4 3R4=400 
MOV €052525,,(R4) 3400=052525 
MOV 0402 ,R1 3R1-402 
MOV #125252 ,(R1) 3402*125252 
CLC ;CLEAR CARRY 
BIT (R4),CR1) 3 #0052525 1125252*0 
BCS 1$ sERROR IF CARRY 
BEQ 2s sBRANCH IF GOOD 
ERROR +1 :CPU ERROR 


:CC SHOULD = 0100 
CMP CR4),CR1) 3400-402*125253 
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eeceeeeeeese DOUBLE OPERAND TESTS eeccccesecessssos 


011206 001403 BEQ 3% sERROR IF ZERO 
2606 011210 1035002 BCC 3% sERROR IF NO CARRY 
7 011212 102001 BvC 3$ sERROR IF NO OVERFLOW 
2606 011214 100401 BMI 4s sBRANCH IF GOOD 
2609 011216 104001 3$: ERROR +1 sCPU ERROR 
2610 sCC SHOULD = 1000 
2611 011220 005014 43: CLR (R4) 
2612 011222 005214 INC (R4) 34001 
26135 011224 031114 BIT (R1),CR4) 3125252110 
2614 011226 001401 BEQ sBRANCH IF GOOD 
2615 011230 104001 S$: ERROR +1 sCPU ERROR 
2616 sCC SHOULD= 0100 
2617 011232 6% 
26168 
2619 
2622 011232 MM22 
2625 
2624 ; TEST MOV MODE 2,2 
2625 011232 012704 000400 #400, 3R4=400 
2626 011236 012701 000402 MOV #402 ,R1 sR1=402 
2627 0 012714 000005 MOV #5,(R4) 34005 
2626 011246 005021 CLR (R1)- 3402=0 
2629 011250 005011 CLR (R1) ; 
2630 011252 005111 (R1) 3404=-1 
2631 011254 005741 TST -(R1) sR1=402 
2632 011256 000277 scc sCC#1111 
2633 011260 012124 MOV CR1)+, CR4)> 3400*0 &4*402 R1*404 
2634 011262 100403 BMI 8 sERROR IF 
2835 011264 103002 Bcc 1% sERROR IF NO CARRY 
11266 1 BvS 1s sERROR IF OVERFLOW 
2637 011270 001401 BEQ 2s sBRANCH IF GOOD 
2636 011272 104001 18: ERROR +1 sCPU 
2639 sCC SHOULD= 0101 
roe 011274 005244 2s: INC -(R4) 3400*1 R4=400 
011276 061411 (R4),(R1) sie -1 50 
2643 011300 001401 BEQ ay sBRANCH IF GOOD 
2644 011302 104001 3%: ERROR +1 sCPU ERROR 
2645 sCC SHOULD = 0100 
2646 011304 as 
2647 
2648 : 
2651 011304 MS22 
2852 
2653 ; TEST SUB MODE 2,2 
26354 011304 012704 000400 MOV 0400 ,R4 3R4=400 
2635 011310 012701 000402 MOV #402 ,R1 sR1*402 
2656 011314 012714 177760 MOV #177760, (R4) 3400177760 
2657 011320 012711 177750 MOV #177750,(R1) 3402*177750 
2656 011 162421 SUB (R4)+,(R1D+ sR1*177770 
2659 011326 001403 BEQ 1% sERROR IF ZERO 
2660 011330 102402 BVS 1$ sERROR IF OVERFLOW 
28661 0113532 103001 Bcc 1$ sERROR IF NO CARRY 
2862 011334 100401 BMI 26 sBRANCH IF 
2663 011336 104001 1%; ERROR +1 sCPU ERROR 
2664 sCC SHOULD=1000 
2665 011340 005241 2s; INC -(R1) pR1°1777771 


2900 
2901 011414 
2902 
2903 011416 
2904 420 


2938 
2939 011510 


162721 
100401 
001401 
104001 


177771 


0000 
177777 


16: 
2s: 


38: 
4t: 


COKDACO KD.11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 7- 
seceeeeeesee DOUBLE OPERAND TESTS seeceesscesesoocs 


SUB @177771,(R1) 
BM1 3$ 
BEQ 4s 
ERROR +1 


TEST BIC, BICB, BIS, 
MOV #400 ,R4 
MOV #402 ,R1 


MOV #404 ,R2 

MOV #141401, (R4) 
MOV #177405 ,(R1) 
MOV @70,(R2)« 
MOV @-1,CR2)¢ 
BIC CR4)+,CR1)> 
BEQ is 

BPL es 


ERROR +1 
BIS (R4)+,(R1 D+ 
3ICcB mata 


DEC 1 
BISB (R4)+,CR1)> 
BMI ay 


ERROR +1 
INC (R4) 
6% 


TEST BIT, CMP MODE 2.2 
MOV Ra 


ERROR +1 

ry 
BITe CR1)+, CR4)> 
BEQ 3% 
BMI 4% 
ERROR ol 


-42 
. sR1*0 


sCPU ERROR 
:CCSHOULD = 0100 


BISB MODE 2.2 
jR4e 


3;CPU ERROR 
CC SHOULD = 0100 


3¢¢ ANDED RESULT = 200 
IF € 


CPU ERROR 
1CC SHOULD= 1000 R4=402 R1=404 
CMP (R4)+,CR1)> 


sRESULT #01 


SEQ 0060 
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: 
g 


eeceeeceeeee DOUBLE OPERAND TESTS seeceseseceseseses 
2940 011512 001402 BEG 5% sERROR IF EQUAL 
2941 011514 103001 Bcc 5% sERROR IF NO CARRY 
2942 011516 100401 BMI 6% sBRANCH IF GOOD 
2943 011520 104001 S$: ERROR +1 :CPu E 
eI sCC SHOULD = 0000 
2945 011522 005341 6$: DEC -(R1) 34042100001 
2946 011524 005741 TST -{R1) 3R42404 R1 "402 
2947 011526 022124 CMP CR1)+, CR4)> sRESUT =0 
2948 011530 001401 BEQ 8% sBRANCH IF GOOD 
esag 3CC SHOULD = 0100 R1*404 R4=406 
2950 011532 104001 7: ERROR el ;CPU ERROR 
2951 011534 8$: 
2952 
2953 
2956 011534 mS33 
2957 
2958 : TEST SUB MODE 3,3 
2959 011534 CLR 3R420 
2960 011536 012701 000002 MOV #2 ,R1 sRis2 
2961 011542 012702 000400 MOV oR2 3R2=400 
2962 011546 012714 000400 MOV #400, (R4) 30*400 
2963 011552 012711 000402 MOV @402,(R1) 32°402 
2964 011556 012722 MOV #200, (R2)+ 3400=200 
2965 011562 012712 054320 MOV C(R2) 3402*54320 
2966 0 163431 SUB OC RA)» BCR» 354320 - 200=54120 
2967 011570 001402 BEQ sERROR IF 
2968 011572 103401 6cs is sERROR IF CARRY 
2969 011574 100001 BPL 2s sBRANCH IF GOOD 
2970 011576 104001 i$ ERROR ol sCPU 
2971 3CC SHOULD =0001 
2972 011600 022712 054120 2s CMP #54120,(R2) s TEST R4 AUTO-INC AND RESULT 
2973 011604 001401 BEQ 4$ sBRANCH IF GOOD 
2974 011606 104001 3¢: ERROR +1 ;CPU ERROR 
2975 :CC SHOULD = 0100 R4=2 Ri=4 
2976 011610 005067 166164 4$: CLR t+) sRESTORE VECTORS 
2977 011614 005067 166162 CLR 2 F ™ 
2978 
2979 
F 
2983 011620 MCB44 
2984 
29865 3 TEST CMP, BIT MODE 4,4 
2966 011620 012704 000400 MOV #400 ,R4 3R42400 
2987 011624 012701 000402 MOV #402 ,R1 3R1=402 
2968 011630 012721 125366 MOV #125366,(R1)+ 3402=125366 R1=404 
2969 011634 012724 173001 MOV #173001,(R4)+ 34002173001 R4=402 
2990 011640 024441 CMP -(R4),-CR1) 3173001 - ces, CC =0000 
2991 011642 103401 Bcs 1$ sERROR IF CARR 
2992 011644 100001 BPL 2s sBRANCH IF G00D 
2993 sBAD COMPARE 
2994 011646 104001 1%: ERROR +1 ;CPU ERROR 
2995 011650 005204 2s: INC R4 
2996 011652 005201 INC R1 3R1*403 
2997 011654 000261 SEC sSET CARRY 
2998 011656 134144 BITB -(R1), -CR4) 3173120 
2999 011660 103001 Bcc 3% 3C SHOULD REMAIN SET 


3000 011662 001401 BEQ ae sBRANCH IF GOOD 








a SS SS a ait 
| 
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SEQ 0062 
eeeeeeeseees DOUBLE OPERAND TESTS seeesesececcesoss 
3001 s INCORRECT COMPARE R4*400 R1=402 
3002 011664 104001 3%: ERROR +1 ;CPU ERROR 
3003 011666 005724 4$: TST (R4)> 3R4*402 
3004 011670 005201 INC Ri 3R1*403 
3005 011672 124441 CMPB -(R4), -CR1) 3173 - 1730 
3006 011674 001401 BEQ 6% sBRANCH IF 
3007 sBAD COMP 
3008 011676 104001 S$: ERROR +1 ;CPU ERROR 
3009 011700 63: 
3010 3 
3013 011700 MASS: 
3014 
3015 3 TEST ADD MODE 5,5 . 
3016 011700 012704 MOV #400 ,R4 
3017 011704 012724 1 MOV #1,(R4)+ 3400-1 
3018 011710 012724 177776 MOV @-2,(R4)+ 3402=-2 
3019 011714 012724 MOV @400,, (R4)+ 34042400 
3020 011720 012714 MOV #402 ,(R4) 3406402 R4*406 
3021 011724 012701 000410 MOV @410,R1 ‘ 3R1=410 
3022 011730 065451 ADD @-(R4),8-C(R1) sle -22 -1 
3023 011732 001402 BEQ 1$ sERROR IF ZERO 
3024 011734 100001 BPL 1% sERROR IF PLUS 
3025 011736 103001 BCC 2s sBRANCH IF GOOD 
— 011740 104001 1$ ERROR 1 sCPU ERROR 
3 
3028 011742 062704 000004 2s ADO e4 RA 3R42410 
3029 011746 065154 ADO @-(R1),8-C(R4) s-l +120 
3030 011750 001401 BEQ 4s ;BRANCH IF GOOD 
3031 011752 104001 3% ERROR 1 ;CPU ERROR 
3032 3CC SHOULD= 0100 R4=406 R1=402 
3033 011754 4s 
3034 
3035 : 
3038 3 
3039 ; 
3040 grr c ern nn nen nn eee ee ee ee eee eee eee 
3041 sTEST DOP BIT(B) MODE 6.6 
3042 5 
3043 3 
3044 3 
3045 3 
3046 011754 MBEE : 
3047 
3048 3 TEST BIT, BITB MODE 6.6 
3049 011754 CLR R4 R420 
3050 011756 012701 000400 MOv #400 ,R1 ’ 
3051 011762 012721 125252 MOV #125252 ,(R1)+ 3400*125252 
3052 C11766 012721 000001 MOV #1,(R1)+ 3402=1 
3053 011772 012721 100000 #100000 ,(R1)-+ 340421000000 R1=406 
3054 011776 0O 1 000400 177774 BIT 400(R4), -4(R1) 3(400)t(402)=0 
3055 0 001401 BEQ es sORANCH IF GOOD 
3056 sCC SHOULD = 0100 
3057 012006 104001 1%: ERROR ol :CPU ERROR 
3058 012010 136461 000405 177772 2%: BITB 405(R4), -6(R1) 3(405 )t( 400 )=200 
3059 012016 001401 BEQ 3% sERROR IF ZERO 
3060 012020 100401 BMI 4% ;BRANCH IF GOOD 


3061 sCC SHOULD = 1000 








ae | 
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SEQ 0063 
eeeeeeeseees DOUBLE OPERAND TESTS seceseesesesosess 

3062 012022 104001 3%: ERROR +1 3;CPU ERROR 
3063 012024 4$: 
3065 3 
3068 012024 MS77: 
3069 
3070 : TEST SUB MODE 7,7 
3071 012024 012704 000400 MOV #400 ,R4 ; 
3072 012030 005001 CLR RL 
3073 012032 012724 177776 MOV @-2,(R4)+ 3400-2 
3074 012036 012724 177777 MOV @-1,(R4)> 3402=-1 
3075 012042 012724 000400 MOV o(R4)> 34042400 R4*406 

76 012046 012711 000402 MOV #402 ,(R1) 30*402 
3077 012052 005201 INC 1- sRi=1 
3078 012054 167471 177372 000403 SuB 8-406(R4) , 8403(R1) s-2 - -1 = -l 
3079 012062 001401 BEQ 1s sERROR IF ZERO 
3080 012064 100401 BMI es sBRANCH IF GOOD 
3061 3sCC SHOULD=1000 
3082 012066 104001 1%: ERROR +1 ;CPU ERROR 
3063 012070 167174 177777 177776 2%: SUB @-1(R1).8-20R4) s-1 - -1 +0 
3084 012076 001401 BEQ aa sBRANCH IF GOOD 
30865 012100 104001 3$ ERROR 1 ;CPU ERROR 
BSH sERROR ON SUBTRACT 400-0 
30867 012102 005067 165672 4$: CLR (¢) sRESTORE VECTORS 
3088 012106 005067 165670 CLR 2 : . 
3089 
3030 
3091 
3094 012112 MRLO 
3095 
3096 : TEST ROL, ROLB MODE O 
3097 012112 012704 125252 MOV #125252 ,R4 3R4=125252 
3096 012116 000277 scc pete 
3099 012120 006104 ROL R4 R42052525 WITH os SET 
3100 012122 102004 BvC 1$ TERROR IF v CLEAR 
3101 012124 103003 Bcc is sERROR IF CARRY CLEAR 
3102 012126 022704 052525 CMP #052525 .R4 sSEE IF RO = EXPECTED 
3103 012132 001401 BEQ es sERROR IF R4 NE EXPECTD 
3104 012134 104001 18: ERROR +1 ;CPU ERROR 
3105 sROL FAILED, CC SHOULD-0011 
3106 012136 012704 125252 2s: MOV #125252 ,R4 3842125252 
3107 012142 000257 ccc :CC=0000 
3106 012144 106104 ROLB RA sROTATE EVEN BYTE 
3109 012146 103005 Bcc 3% sERROR IF NO CARRY 
3110 012150 102004 BvC 3% sERROR IF NO OVERFLOW 
3111 912152 100403 BMI 3$ sERROR IF MINUS 

12 012154 022704 125124 CMP #125124 ,R4 3SEE IF = = EXPECTED 
3113 012160 001401 BEQ ag ;BRANCH IF GOOD 
3114 012162 10401 3%: ERROR ol ;CPU ERROR 
3115 sROLB FAILED, CC SHOULD=1011, R4=125125 
3116 012164 4%: 
3117 
3118 F 
3121 012164 MRLB1 
3122 
3123 $ TEST ROL, ROLB MODE 1 


3124 012164 005004 CLR Ra 3R420 


3125 012166 
3126 012172 


3164 012322 
3165 012324 


012714 
006114 


005004 
012714 


052525 


052652 


100000 





1%: 
2s: 


3%: 
4$: 


1%: 
2s: 


3%: 
43: 


M5 
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eseseseceese DOUBLE OPERAND TESTS eeesecesesecosoes 


MOV #52525, (R4) 30*52525 
ROL (R4) s@eTEST INSTRUCTION, 0°125252 
BPL 1s sERROR IF PLUS 
Bvc 1s sERROR IF NO OVERFLOW 
6cS 1% sERROR IF CARRY 
CMP (R4), 0125252 :SEE IF R4-EXPECTED 
BEQ 2s sBRANCH IF GOOD 
sBAD ROL .CC SHOULD-1010 
ERROR +1 ;CPU ERROR 
HOV #125252 , (R4) 30°125252 
INC Ra sR421 
scc sCC#1111 
ROLB (R4) s@eTEST INSTRUCTION 
BMI 3% sERROR IF RESULT IS POSITIVE 
Bcc 3$ sERROR IF NO CARRY 
BvC 3$ sERROR IF V CLEAR 
DEC Pa 3R420 
CMP #52652 ,(R4) sERROR IF O NE EXPECTED 
BEQ 8% sBRANCH IF GOOD 
ERROR +1 ;CPU ERROR 


sBAD ROLB ODD BYTE.CC SHOULD=-1011 


TEST ROL, ROLB MODE 2 
CLR Pa 


R420 
MOV #100000 , (R4) 30=100000 
ccc :CC=0000 
ROL (R4)o s*TEST INSTRUCTION 
Bcc 1s sERROR IF NO CARRY 
BvC 1s sERROR IF NO OVERFLOW 
BEQ 2s sBRANCH IF GOOD 

sROL FAILED .CCSHOULD= 0100 
ERROR ol ;CPU ERROR 
DEC Re 
DEC ea 
BNE 38 sERROR IN AUTO-DEC 
— 04040, (R4) 30°4040 
ROL3 (R4)> 3@eTEST INSTURCTION 
Bcs 3% sERROR IF CARRY SET 
evs 33 ;ERROR IF Vv 
DEC R4 
CMP #04100, (R4) ;SEE IF O= EXPECTED RESULT 
BEQ as ;BRANCH IF GOOD 
ERROR +1 ;CPU ERROR 

3BAD ROL 

TEST ROL, ROLB MODE 3 
CLR RA 3R420 
MOV 0052525, (R4) 30*52525 


SEQ 0064 








ONS 
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eceeceeesese DOUBLE OPERAND TESTS eeececccecesoooes 


31866 012330 000277 scc sCC#1111 
3167 012332 006137 000000 ROL 260 3@e@TEST INSRUCTION MODE 3 WITH PC 
3168 012336 100005 BPL 1$ sERROR IF PLUS 
31869 012340 102004 BvC 1s sERROR IF NO papa 
3190 012342 1034035 ecs 1$ sERROR IF CARR 
3191 012344 022714 1252535 CMP #125253, (R4) 3 COMPARE RESULT WITH EXPECTED 
3192 012350 001401 BEQ 2s sBRANCH IF GOOD 
3193 sBAD ROL CC SHOULD=-1010 
3194 012352 104001 1$: ERROR +1 :CPU ERROR 
3195 012354 012714 125252 2s: MOV #125252, (R4) 3:0*°125252 
3196 012360 SEC 3CC=#---1 
3197 012362 106137 000000 3@eTEST INSTRUCTION 
3196 012366 100402 BMI 33 sERROR IF MINUS 
3199 012370 103001 Bcc 3$ sERROR IF NO CARRY 
3200 012372 102401 BVS 43 sBRANCH IF OVERFLOW 
3201 012374 104001 3%: ol ;CPU ERROR 
;BAD ROL. CC SHOULD-1011 

3203 012376 4$: 
3204 
3205 F 
3208 012376 MRL4: 
3210 F TEST ROL MODE 4 
3211 012376 005001 CLR Ri 3R1=0 

012400 012704 000002 MOV @2,R4 R422 
3213 012404 012711 054321 MOV #54321,(R1) 3054321 
3214 012410 000277 scc 3CC*1111 
3215 012412 006144 ROL -(R4) 3@eTEST INSTRUCTION 
3216 012414 100007 BPL 1s sERROR IF PLUS 
3217 012416 102006 BVC 1% sERROR IF NO OVERFLOW 
3218 012420 103405 ecs is 3 CARRY 
3219 012422 022711 130643 CMP #130643,(R1) sSEE IF EXPECTED RESULT 
3220 012426 001002 BNE 1$ 36R IF ROL FAILED 
3221 012430 005704 TST R4 sSEE IF AUTO-DEC WORKED 
3222 012432 001401 BEQ 2s sBRANCH IF 
3223 sERROR! BAD ROL INST 
3224 012434 104001 1%: ERROR o1 ;CPU E 
3225 012436 2s: 
3226 
3227 ; 
3230 012436 MMRLS: 
3231 
32 F TEST ROL MODE 5S 
3233 012436 CLR R4 3R4=0 
3234 0 012714 000400 MOV 0400, (R4) :0*400 
3235 012444 012734 123456 MOV 0123456 , O(R4)+ 3400=123465, R4=2 
3236 012450 000277 scc :CC#1111 
3237 012452 006154 ROL @-(R4) 3;eeTEST INSTRUCTION 
3238 012454 100410 BMI 1% sERROR IF RESULT IS MINUS 
3239 012456 103007 Bcc 1% s;ERROR IF NO CARRY 
3240 012460 102006 BvC 1% sERROR IF NO OVERFLOW 
3241 012462 005704 TST R4 sSEE IF AUTO-DEC WORKED 
3242 012464 001004 BNE 1$ sERROR OF AUTO-DEC 
3243 012466 022737 047135 000400 CMP 047135 ,80400 ISEE fan 9 RESULT 





ee ee ee es eee | - - - - — oe ee 
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SEQ 9066 
eeceecececee DOUBLE OPERAND TESTS eeecccocecesesese 
3247 012500 2s: 
3248 
‘ 
34 012500 MRL6: 
3 TEST ROL MODE 6 
3255 012500 012704 000400 MOV #400, 3R4°400 
3256 012504 1 CLR Ri sR1°0 
3257 012506 012711 032525 MOV #32525 ,(R1) 30*°32525 
012512 000277 scc 
3259 012514 006164 177400 ROL -400( R4 ) seeTEST INSTRUCTION 
3260 012520 100405 BRI 1% sERROR IF MINUS 
3261 012522 103404 8cs 1% sERROR IF CARRY 
3262 012524 1024035 @YS 18 sERROR IF 
012526 022711 065253 CMP #65253, (R1) sSEE IF CORRECT RESULT 
3264 012532 001401 BEQ es sBRANCH IF 
3265 3B8AD ROL MODE 6 
3266 0 104001 18: ERROR ol 3sCPuU 
3267 012536 2s: 
3 
3272 012536 ARL?: 
3273 
3274 3 TEST ROL MODE 7 
3275 012536 012704 000400 MOV @400 ,R4 3R4°400 
3276 012542 005037 000402 CLR 340220 
3277 012546 012737 100000 MOV #100000 , 860 30*100000 
3278 012554 006174 000002 ROL @2(R4) s@eTEST INSTRUCTION 
3279 012560 100406 BMI 1a sERROR IF MINUS 
012562 001005 BME is sERROR IF NOT ZERO 
3261 012564 103004 ecc 18 sERROR IF NO CARRY 
3262 012566 1020035 BvC 18 sERROR IF NO OVERFLOW 
3263 012570 005737 000000 TST B80 3 CHECK SULT 
3264 012574 001401 BEQ 2s sBRANCH IF GOOD 
3265 3B8AD ROL MODE 7 
3266 012576 104001 18: ERROR +1 :CPu ERROR 
32867 012600 2s: 
3268 
3269 3 
3350 012600 MSW37: 
3351 
3352 3 TEST SWAB MODE 37 
3353 012600 012704 000400 MOV 0400 ,R4 3842400 
3354 012604 012714 040700 Ov #40700 , (R4) 3400= 101 
3355 012610 000337 000400 Soh BeAOO 3400 D = 300 101 
012614 1 oni 18 pEROR fa] 
3357 012616 022714 140101 chp #140101, (R4) 3SEE IF EXPECTED RESULT 
3358 012622 001005 ONE 1s sBRANCH IF B 
3359 012624 000337 000400 Sig 6200 3400*101 300 
3360 012630 100401 BMI 2s :BRANCH IF GOOD 
3361 sERROR! BAD SWAB MODE 37 
3362 012632 104001 1%: ERROR ol ;CPU ERROR 
3363 012634 2s: 
Bees] 
3365 F 
3368 012634 ARRO: 


3002 
3429 013010 
3430 015012 


212704 
000257 


COKDACO KDJ11-8 CLUSTER DIAG. 
eeceeececess DOUBLE OPERAND TESTS ececcccccccososoess 


052525 


025252 


000001 
012756 


003072 


012722 


003072 
012754 


003072 


003072 
012720 


003072 


MACRO 1290 


C6 


18-OCT-84 16:38 PAGE 7-49 


TEST ROR MODE 0 
MOV #52525 


SEG 0067 


-R4 184252525 
ccc 3CC 0000 
ROR R4 sR4 SHOULD = 25252 WITH CARRY 
BCC 1$ CARRY 
CMP 025252 ,R4 3SEE IF Rae EXPECTED 
BEQ es sBRANCH IF GOOD 
sROR MODE O FAILED 
Bee ERROR ol sCPU ERROR 
3 
MRRB1: 
3 TEST RORB MODE 1 
CL RA 3R420 
MOV @1,(R4) 30°1 
scc sCC*1111 
RORB (R4) 30°000200, NO 
ecc is sERROR IF NO CARRY 
BPL 18 sERROR IF 
cep @200 ,(R4) sCHECK RESULT 
SEQ zt sGRANCH IF GOOD 
18: ERROR ol 3 
38AD RESULT 
23: 
3 
MJ: 
3 TEST wR - AL MODES 
003072 MOV 01, 80SEQ sSETUWP TEST SEQUENCER 
Ov O71 .R1 3sSET MODE i JUMP ADDRESS 
JP (R1) s¢28 MODE 1 
000002 MWe: CoP @0SEQ, 02 sCHECK FOR CORRECT SEQUENCE 
BEQ MJUGA sGRANCH IF GOOD 
sMODE 2 JUPP FAILED 
16: ERROR el 3CPu ERROR 
MIUCA: CHP R1, OAM +2 sCHECK FOR AUTO- INCREMENT 
BEQ sGRANCH IF GOOD 
2s: ERROR ol sCPU ERROR 
sAUTO-INCR FAILED 
MJU2ZB: INC &°osee sUPDATE TEST SEQUENCER 
MOV otJ2 .R1 sSETUP MODE 3 wUPP 
JP @R1)- sJUPP MODE 5 
MJ: .WORD Mus sMODED 3 DETINATION 
000001 MUU1: CHP GOSEQ, 1 3s TEST FOR CORRECT SEQUENCE 
BEG MUJULA sGRANCH IF GOOD 
3%: E@ROR ol sCPu E 
1JP OUT OF SEQUENCE 
MJULA: INC BOSE sUPDATE SEQUENCE 
Ov ome ,R1 sSETUP MODE 2 DESTINATION 
se (R1)> r MODE 2 
000003 MUS: Cop @eSEQ, @3 s TEST FOR CORREC’ SEQUENCE 
BEQ MJUSA sBRANCH IF GOOD 
86 ERROR ol ;CPU ERROR 


D6 
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SEG 0068 


sJP OUT OF SEQUENCE 
3432 013014 022701 012756 MJUSA; CHP omJ2+2,R1 s_TEST AUTO- INCREMENT 
3433 013020 001401 BEQ MJU3B sBRANCH IF GOOD | 
3434 013022 104091 S$: ERROR +1 sCPU ERROR | 
sPUTO- INCREMENT FAILED MODE 5 
3436 013024 005237 003072 INC @05FQ sUPDATE SEQUENCER 
3437 013030 012701 015100 MOV OM JU4 +2 ,R1 sSETUF DESTINATION MODE 4 
3438 013034 000141 JP -(R1) sEXECUTE JUMP MODE 4 
3439 013036 000000 HALT 
01 022701 013134 cep onS .R1 sCHECK AUTO-DECREMENT 
3441 013044 001401 BEQ MJUSA sBRANCH IF GOOD AUTO-DEC 
3442 013046 104001 68: ERROR +1 sCPU ERROR 
yaa sAUTO-DEC FAIELD MODE 5 
3444 013050 023727 003072 000005 MUJUSA: CrP B0SEQ, 05 s TEST CORRECT SEQUENCE 
3445 013056 001401 BEQ MJUSB sBRANCH IF GOOD SEQUENCE 
3446 013060 104001 78: ERROR +1 sCPU ERROR 
M44? sJeP OUT OF SEQUENCE 
3448 013062 005237 003072 KJUSB: INC BeSEQ sUPDATE SEQUENCE COUNT 
3449 013066 012701 015151 MOV @HJU6 -S,R1 sSETUP DESTINATION MODE6 
Sane 013072 000161 000005 JP oS(R1) sJUMP MODE 6 
$3 
3452 013076 000240 MJU4: NOP 
3453 013100 022701 015076 cop On JU4 ,R1 s_ TEST AUTO-DECR 
3454 013104 001401 BEQ MJU4A sBRANCH IF GOOD 
3455 013106 104001 8$: ERROR +1 sCPU ERROR 
3456 sMODE 4 AUTO-DEC FAILED 
3457 013110 023727 003072 000004 MUJU6A: CMP BOSEQ. 04 s_TEST FOR CORRECT SEQUENCE 
3456 0135116 001401 BEQ MJU48 sBRANCH IF CORRECT SEQUENCE 
3459 013120 104001 98: ERROR +1 
3460 sINCORRECT JP SEQUENCE 
3461 013122 005237 003072 MJU4B: INC S0SEQ s UPDATE 
3462 013126 012701 013136 MOV OMS +2,R1 sSETUP MODE S POINTER 
3463 013132 000151 JP @-(R1) sEXECUTE MODE 5S uP 
6 
3465 013134 013040 MUS: -WORD = MUUS+2 sPOINTER MODE 5 
3 
3467 013136 022737 000006 003072 MJU6: CrP 06 , B@SEQ sCHECK FOR CORRECT SEQUENCE 
3468 013144 001401 BEQ MJUGA sBRANCH IF GOOD 
3469 013146 104001 108: ERROR +1 5 
3470 s INCORRECT SEQUENCE 
3471 013150 005237 003072 MJUGA; INC BESEG 5 TE SEQUENCER 
3472 013154 012701 013174 MOV oJ7+10,R1 s SETUP x 
3473 013160 000171 177770 JP @-10(R1) sEXECUTE MODE 7 JUMP 
3474 ees 013170 MJ7: — MJU7 sPOINTER FOR MODE 7 
3476 013170 022737 000007 003072 MJU7: CrP 7, @@SEQ s_ TEST FOR CORRECT SEQUENCE 
3477 013176 001401 BEQ MJUTE sBRANCH IF GOOD SEQUENCE 
3476 01 104001 118: ERROR +1 sCPU ERROR 
3479 s TESTING OUT OF SEQUENCE 
: 013202 MJUTE : 
H 
3492 
3493 ’ TEST THAT PRE-FETCH BUFFER CAN BE OVER WRITTEN 
3494 013202 012701 0153512 MOV 126% ,R1 sSET UP R1 WITH ADDRESS OF ERROR 
3495 sROUTINE 
96 000040 -REPT 32. 
3496 013206 012717 MOV (PC)+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 


eeeeeeeecese DOUBLE OPERAND TESTS eecceccacsecosese 


013370 


000240 
000111 
012717 


643; 


. WORD aaa 

. WORD 
MOV CPC)», (PC) 
-WORD NOP 

-WORD 111 
MOV (PC )+, CPC) 
-WORD NOP 

-WORD 111 
MOV (PC )+, (PC) 
-WORD NOP 

-WORD 111 
OV CPC )+, CPC) 
-WORD NOP 

-WORD 111 
MOV CPC )+, CPC) 
-WORD NOP 

-WORD 111 
“Ov CPC )+, CPC) 
-WORD NOP 

-WORD 111 
MOV (PC)+, CPC) 
-WORD NOP 

-WORD 111 
MOV CPC )+, CPC) 
-WORD NOP 

-WORD 111 
MOV (PC )+, CPC) 
-WORD NOP 

-WORD 111 
MOV CPC )+, CPC) 
-WORD NOP 

-WORD 111 
MOV CPC )+, CPC) 
-WORD NOP 

-WORD 111 
MOV CPC )+, CPC) 
-WORD NOP 

-WORD 111 
MOV (PC )+, CPC) 
-WORD NOP 

-WORD 111 
MoV CPC )+, (PC) 
.WORD NOP 

-WORD 111 
MOV CPC )+, (PC) 
-WORD NOP 

-WORD 111 
MOV CPC)+, (PC) 
-WORD NOP 

-WORD 111 
MOV (PC )+, CPC) 
-WORD NOP 

-WORD 111 
MOV CPC)+, (PC) 
.WORD NOP 

-WORD 111 
MOV CPC)+,£PC) 


E6 
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sNOP INSTRUCTION 
+ JP R1) 


SWRITE THE NOP OVER 
sNOP INSTRUCTION 


sNOP INSTRUCTI 


3 JP CR1) 

sWRITE THE NOP OVER 
sNOP INS ON 
sep R1) 


sNOP INSTRUCTION 


+ 


R1) 
sWRITE THE 1 Nop OVER 
yNOP INSTRUCTION 
3 IMP (R1) 
:WRITE THE NOP OVER 


3333333333 33 tt FF FF 3 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


INSTRUCTION 


SEQ 0069 
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eeseeseceene DOUBLE OPERAND TESTS eescccesesesevess SEQ 0070 


013372 000240 .WORD NOP sNOP INSTRUCTION 
013374 000111 83%: -WORD 111 1 JP (R1) 
013376 012717 MOV CPC )+, CPC) sWRITE THE NOP OVER THE JUMP INSTRUCTION 
013400 000240 .WORD NOP sNOP INSTRUCTION 
013402 000111 B43: -WORD 111 3 JP (R1) 
013404 012717 MOV CPC )+, CPC) iWRITE THE 1 Nop OVER THE JP INSTRUCTION 
013406 000240 -WORD NOP sNOP INSTRUCTION 
013410 000111 85%: . WORD 311 3 JP (R1) 
013412 012717 MOV CPC )+, CPC) sWRITE THE THE JMP INSTRUCTION 
013414 000240 .WORD NOP sNOP INSTRUCTION 
013416 000111 86%: . WORD 111 sp (Ri) 
013420 012717 MOV CPC )+, CPC) sWRITE THE NOP THE JP INSTRUCTION 
013422 000240 .WORD NOP sNOP INSTRUCTION 
013424 OO0111 67%: -WORD 111 a (R1) 
013426 012717 MOV CPC )+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
013430 000240 -WORD NOP sNOP INS TION 
013432 000111 88%: -WORD 111 X 5 P (R1) 
013434 012717 MOV CPC )+, (PC) sWRITE THE NOP THE JP INSTRUCTION 
013436 000240 -WORD NOP sNOP INSTRUCTION 
013440 000111 69%: . WORD 111 1 RP CR1) 
013442 012717 MOV CPC )+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
013444 000240 -WORD NOP sNOP INSTRUCTION 
013446 OOO011i 90%: -WORD 111 sP (R1) 
013450 012717 MOV CPC )+, CPC) sWRITE THE NOP THE JP INSTRUCTION 
013452 000240 -WORD NOP sNOP INS ON 
013454 000111 91%: -WORD 111 sP (R11) 
013456 012717 MOV CPC )+, CPC) sWRITE THE NOP OVER THE UMP INSTRUCTION 
013460 000240 .WORD NOP sNOP INSTRUCTION 
013462 000111 92%: -WORD 111 sep (R1) 
013464 012717 MOV CPC )+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
013466 000240 -WORD NOP 3NOP INSTRUCTION 
013470 000111 93%: -WORD 111 3 JP (R1) 
013472 012717 MOV CPC +, CPC) sWRITE THE NOP OVER THE JUMP INSTRUCTION 
013474 000240 -WORD NOP sNOP INS TION 
013476 000111 94%: -WORD 111 sep (R1) 
013500 012717 MOV CPC )+, CPC) sWRITE THE x4 OVER THE JMP INSTRUCTION 
013502 000240 -WORD NOP 3NOP INSTRUCTI 
013504 000111 95%: -WORD i111 3 MP (R1) 
3499 013506 000137 013514 JP 80129% sJUMP OVER 
3500 013512 128% sERROR! ORE FETCH BUFFER WAS NOT 
s;OVER WRITT 
ao | 013512 104001 ERROR +1 sCPU ERROR 
F 
3504 $ NOW RESTORE THE OVER WRITTEN JMP INSTRUCTIONS FOR THE NEXT PASS. 
3505 $ 
3506 013514 012702 000040 129%: MOV @32.,R2 3SET UP R2 AS COUNTER 
3507 013520 012703 013212 MOV 0646 ,R3 3SET UP R3 AS POINTER 
3506 013524 012713 000111 130%: MOV #111,(R3) sRESTORE OVER WRITTEN JUMPS 
3509 013530 062703 ADO @6,R3 sPOINT TO NEXT OVER WRITTEN ADOR. 
+4 013534 077205 S08 R2,1308 300 UNTIL R2=0 
3513 3 
3515 013536 MUP ; 
3516 
3517 TEST JMP MODES 17,27,37,.67,77 
3516 013536 012737 000000 003072 MOV #0, 8@SEQ sSETUP TEST SEQUNCER 
3519 013544 000117 JMP (R7) 3 JUMP MODE 17(SHOULD BE IN-LINE) 


3521 013546 


3 
3524 013554 


i 


3527 


3577 
3576 0135734 


022737 


003072 


003072 
000401 


003072 
003072 


003072 
177714 


000002 


003076 
003072 


003072 


a 
MJP17: 
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; 
: 
; 


TST 
BEQ 

1%: ERAOR 

2s: INC 
JP 

3 
HALT 

3 

MJP27: CMP 
BEQ 

18: ERROR 

MJP27A: INC 
Jp 

MJP67: CMP 
BEQ 

2s: ERROR 

MJP67A: INC 
ccc 
sep 

; HALT 

F 

MJP67B: .WORD 

HUP77; CHP 
BEQ 

3%: ERROR 

MJPS7: CHP 
BEQ 

4%: ERROR 

MJPS7A: INC 
sp 

t 

F 

MJP77E: 

3 

3 

MJSR ; 

: 
MOV 
MOV 
SUB 
MOV 
MOV 
CLR 
COM 
JSR 

b 

MJSR2: CMP 


sUPDATE SEQUENCE NUMBER 
sJUMP MODE 27 

s( THE @401°BR UPDATED PC+2) 
3 

sCHECK IF CORRECT SEQUENCE 
BRANCH IF IN SEQUENCE 


1 BRANCH 

:CPU ERROR 

s TEST OUT OF SEQUENCE 
sUPDATE SEQUENCER 
sINSURE ZBIT=0 
sJUMP MODE 7 


s TEST FOR CORRECT SEQUENCE 
;BRANCH IF IN SEQUENCE 


:CPU ERROR 

3; TEST OUT OF SEQUENCE 
3s TEST FOR CORRECT SEQUENCE 
sBRANCH IF IN SEQUENCE 


:CPU ERROR 
3s TEST OUT OF SE 


QUENCE 
sUPDATE SEQUENCER 
3 JUMP MODE 6 


sSAVE STACK POINTER LOCATION 


1SPSJ = R6 AFTER DECRIMENT 
sSETUP SEQUENCE COUNTER 


sSETUP INITIAL JUMP IN MODE 1 


F 
R4=-1 TO BE SAVED ON STACK 
3JSR MODE 1 


s TEST FOR CORRECT SEQUENCE 


SEQ 0071 


H6 
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SEG 0072 | 
eeeeeseseeee DOUBLE OPERAND TESTS sececescesesosecs 
3579 013742 001401 BEQ MUSR2A :BRANCH IF GOOD 
358C 013744 104001 5%: ERROR ol sCPU 
3561 sMODE 2 T SEQUENCE 
3582 013746 023706 003076 MJSR2A: CMP @eSPSU RE sVERIFY STACK DE 
3563 013752 001006 BNE sBRANCH IF STACK INCORRE 
3564 013754 021627 125252 CMP (R6), #125252 sVERIFY CONTENTS STACK 
3585 013760 0010035 BNE 6% sBRANCH IF DATA ON STACK INCORRECT 
35866 013762 022704 014076 CMP OMISR4E RO sSEE IF CORRECT RETURN ADORESS 
35867 013766 001401 BEQ MJSR2B sBRANCH IF GOOD 
3588 013770 104001 68: ERROR o1 sCPU ERROR 
3589 sJSR MODE 2 FAILED 
3590 013772 005237 003072 MJSR2B: INC BOSFQ sUPDATE SEQUENCE COUNTER 
3591 013776 013706 003074 MOV @eSPS .R6 sRELOAD STACK POINTER 
3592 014002 012701 014014 MOV @MJSRA ,R1 sSETUP JSR MODE 3 
3593 014006 CLR R4 sOIFFERENT DATA TO R4 
3594 014010 004431 ° JSR R4,BCR1)> sJSR MODE 3 
3595 014012 HALT 
or 014014 014162 MJSRA: .WORD MJSRS sLITERAL FOR JUMP MODE 3 
3 
3598 014016 022737 000001 003072 MJSRi: CrP @1,80SEQ s TEST FOR CORRECT SEQUENCE 
3599 014024 001401 BEQ MJSR1IA sBRANCH IF GOOD 
3600 014026 104001 78%: ERROR o1 ;CPU ERROR 
3601 sMODE 1 JUMPED TO OUT OF SEQUENCE 
3602 014030 023706 003076 MJSRIA: CMP BeSPSI RE sVERIFY STACK DECRIMENT 
3603 014034 001006 BNE 83 ne IF STACK INCORRECT 
3604 014036 021627 177777 Cep (R6),@-1 Y CONTENT OF STACK 
3605 014042 001003 BNE 83 "Sane IF DATA ON STACK INCORRECT 
3606 014044 022704 0135734 CMP @MJSR2 ,R4 3sSEE IF CORRECT RETURN ADDRESS 
3607 014050 001401 BEQ MJSR18 IBRANCH IF GOOD 
3608 014052 104001 8s: ERROR o1 sCPU ERROR =, 
3609 sJSR MODE 2 FAILED “4 
3610 014054 005237 003072 MJSR1iB: INC Bessa sUPDATE SEQUENCE COUNTER 
3611 014060 013706 003074 MOV BOSPS .R6 sRELOAD STACK POINTER 
3612 014064 012704 125252 MOV #125252 .R4 sSETUP R4 DATA 
3613 014070 012701 013734 MOV emJSR2 .R1 sSETUP MODE 2 JUMP ADDRESS 
Z are 014074 004421 JSR R4,CR1I)Do seJUMP MODE 2 
3 
3616 3 
3617 014076 022737 000004 003072 MUJSR4: CMP 04 , B@SEQ 3s TEST FOR CORRECT SEQUENCE 
3616 014104 001401 BEQ MJSR4A sBRANCH IF GOOD 
3619 014106 104001 9% ERROR o1 sCPU 
sMODE 4 JUMPED T 
3621 014110 023706 003076 MJSR4A: CMP @eSPSJ,RE sVERIFY STACK DECRIMENT 
3622 014114 001006 BNE 0 sBRANCH STACK INCORRECT 
3623 014116 021627 052525 CmP (R6), #052525 sVERIFY CONTENTS OF STAACK 
3624 0 001003 BNE sBRANCH IF DATA ON STACK INCORRECT 
3625 014124 022704 014244 CMP OMISRE ,R4 3SEE IF CORRECT RETURN 
014130 001401 BEQ 16R 
3627 014132 104001 108: ERROR ol sCPU ERROR 
sJSR MODE 4 FAILED 
3629 014134 37 003072 MJSR4B: INC BOSEQ sUPDATE SEQUENCE COUNTER 
3630 014140 013706 003074 MOV BOSPS , RE iRELOAD § STACK Facets 
3631 014144 012704 000377 MOV 0377 ,R4 sSETUP R4 DATA 
32 014150 012701 014162 MOV o2,R1 sSETUP JSR VECTOR 
3633 014154 004451 JSR R4,8-(R1) sJSR MODE 5 
3634 014156 000000 HALT 
3635 014160 014330 MJSRB: .WORD MJSRS sMODE S VECTOR 
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SEQ 0073 
eeeeeesesese DOUBLE OPERAND TESTS seeccececcesesoses | 
3637 ; 
: 
3638 014162 022737 000003 003072 MUJSRS: CHP 03, 8@SEQ s TEST FOR CORRECT SEQUENCE 
3639 014170 001401 BEQ 3A sBRANCH IF GOOD 
3640 014172 104001 118: ERROR ol 3CPU 
1 sMODE 3 JUMPED T0 OF SEQUENCE 
3642 014174 023706 003076 MJSRSA: CMP ° sVERIFY STACK IMENT 
3643 014200 001006 BNE 12% sBRANCH IF STACK INCORRECT 
01 021627 000000 Cop CR6), 00 sVERIFY CONTENTS OF STAACK 
3645 014206 0010035 BNE 12s sBRANCH IF DATA ON STACK INCORRECT 
3646 014210 2704 014012 CMP @MISRA-2,R4 sSEE IF CORRECT RETURN ADORESS 
3647 014214 001401 BEQ MJSR3B 3 IF GOOD 
3648 014216 104001 128: ERROR 1 ;CPU ERROR 
3JSR MODE 3 FAILED 
3650 014220 005237 003072 MJSR3B: INC B8SEQ r 
3651 014224 013706 003074 MOV BOSPS .R6 sRELOAD STACK POINTER 
36S2 014230 012704 MOV 052525. sSETUP R4 DATA 
3653 014234 012701 014100 MOV @MJSR4 +2, R1 sSETUP JSR VECTOR 
3654 014240 000257 ccc sCLEAR CONDITION CODES 
3655 014242 004441 JSR R4,-C(R1) 3JSR MODE 4 
3657 ; 
3 
3658 014244 022737 000006 003072 MJSR6: CHP 06 , B@SEQ s TEST FOR CORRECT SEQUENCE 
3659 014252 001401 BEQ MJSR6A sBRANCH IF GOOD 
3660 014254 104001 13% ERROR ol sCPU 
1 sMODE 6 JUMPED TO OUT 
3662 014256 023706 003076 MJSR6A: CMP BeSPSJ RE sVERIFY STACK DECRIMENT 
3663 014262 001006 BNE 14% sQBRANCH IF STACK INCORRECT 
3664 014264 021627 123456 CMP CR6), 0123456 ar CONTENTS STACK 
3665 014270 0010035 BNE 14% IF DATA = STACK INCORRECT 
3666 014272 022704 014412 Cop @MJSR7 ,R4 iSEE IF ge TURN 
7 014276 001401 BEQ MUSR6EB 3 
3668 014300 104001 14% ERROR 1 3;CPU ERROR 
3669 3JSR MODE 6 F 
3670 014302 005237 003072 MJSR6B: INC 2HSEO Soar 
3671 014306 013706 003074 MOV BOSPS .R6 sRELOAD STACK POINTER 
3672 014312 012704 177773 MOV @-5,R4 sSETUP R4 DATA 
3673 014316 012701 014336 MOV @MJSRC+10,R1 sSETUP JSR VECTOR 
3674 014322 004471 177770 JSR R4,8-10(R1) 3 7 
thy 014326 014412 MJSRC: .WORD 3JSR VECTOR 
3 
3677 5 
36786 014330 022737 000005 9003072 MUSRS: CH #5 , 80SEQ 3s TEST FOR CORRECT SEQUENCE 
3679 014336 001401 BEQ 3 GOOD 
3680 014340 104001 15% ERROR o1 sCPU 
3681 sMODE S JUMPED TO SE 
3682 014342 023706 003076 MUSRSA: CMP BOSPSI RE sVERIFY STACK DE 
3683 014346 001006 BNE 16% sBRANCH IF STACK INCORRECT 
3684 014350 021627 000377 CMP (R6), 0377 sVERIFY CONTENTS OF 
3685 014354 001003 BNE 16% sBRANCH IF DATA ON STACK INCORRECT 
3686 014356 022704 014156 CMP OMJISRB -2 ,,R4 sSEE IF yg RETURN ADORESS 
3687 014362 001401 BEQ MJSRSB sBRANCH IF 
3688 014364 104001 16%: ERROR ol ;CPU ERROR 
3JSR MODE 5S FAILED 
3690 014366 37 003072 MJSRSB: INC GSE sUPDATE SEQUENCE COUNTER 
3691 014372 013706 003074 MOV BeSPS RE sRELOAD STACK POINTER 
3692 014376 012704 123456 MOV #123456 ,R4 sSETUP DATA IN R4 
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3693 014402 
3694 014406 


3726 014516 


012701 
004461 


014254 
177770 
000007 


003976 
177773 
014326 


003074 


000001 
003076 
177777 
014510 


003072 
152525 
003074 
014646 
003072 
003076 
000125 
014722 


003072 


003072 


003076 


003072 


MOV 
JSR 
a 
a 
MJSR7: CMP 
BEQ 
178%: ERROR 
MJSR7A: CMP 
BNE 
CMP 
BNE 
CMP 
BEQ 
188: ERROR 
MJSR7E : 
MOV 
3 
MJRA: 
TE 
MOV 
MOV 
MOV 
SUB 
MOV 
JSR 
3 
MJR27: CMP 
BNE 
CMP 
BNE 
CMP 
BNE 
CMP 
BEQ 
1%: ERROR 
MJR27A: INC 
MOV 
MOV 
JSR 
MJR27B: HALT 
8 
MJR67: CMP 
BNE 
CMP 
BNE 
CMP 
BNE 
CMP 
BEQ 
2s: ERROR 
MJR67A: INC 


@MJSR6+10,R1 sSETUP JSR VECTOR 
R4,-10(R1) i; JUMP MODE 6 
07, 8@SEQ s TEST FOR CORRECT SEQUENCE 
MJSR7A sBRANCH IF GOOD 
+1 sCPU 

sMODE 7 JUMPED TO OF SEQUENCE 
@eSPSU,RE sVERIFY STACK DECR 
8s sBRANCH IF STACK INCORRECT 
(R6),8-5 sVERIFY CONTENTS OF 


STAACK 
sBRANCH IF DATA ON STACK INCORRECT 


18% 
@MJSRS5-2,R4 sSEE IF CORRECT RETURN ADORESS 
MJSR7E sBRANCH IF GOOD 
+1 ;CPU ERROR 
3JSR MODE 7 FAILED 
@6SPS ,R6 sREPLACE STACK 


ST JSR MODES 27, 37, 67, 77 


#1, 80SEQ sSETUP SEQUENCER 
R6 , BeSPS sSAVE STACK ADDRESS 
R6, BOSPSU ‘Smee STACK DECRIMENT ADORESS 
@2,80SPSJ 
@-1,R4 } SETUP R4 DATA 
x sEXECUTE A JSR MODE 27 
#1, 80SEQ s;VERIFY COERRECT TEST SEQUENCE 
sINCORRECT TEST SEQUENCE 
— SJ,.R6 sVERIFY STACK POINTER 
CR6),@-1 sVERIFY R4 GOT LOADED ON THE STACK 
1s sBRANCH IF INCORRECT STACK CONTENTS 
R4, OMIR27 ;VERIFY CORRECT RETURN ADDRESS 
MJR27A sBRANCH IF GOOD RETURN ADDRESS ON STACK 
o1 ERROR 
;MODE 27 FAILED 

Q sUPDATE SEQUENCER 
#152525 ,R4 3SETUP R4 TEST DATA 

S,R6 sRESET STACK POINTER 
R4, BOMIR37 3JSR MODE 37 
@OSEQ, 3 sVERIFY TEST SEQUENCE 
2s sINCORRECT TEST SEQUENCE 
@OSPSJ RE sVERIFY STACK DECR 

sINCORRECT STACK DECRIMENT 

(R6),0125 ;VERFIFY STACK WAS LOADED 
R4, OMJIRT7 sVERIFY RETURN ADDRESS 

7A sBRANCH IF GOOD 
ol :CPU ERROR 

sMODE 67 FAILED 

@OSEQ sUPDATE SEQUENCER 


3762 014664 
3763 014670 
3764 014672 
3765 014676 
3766 014700 
3767 

3768 014702 
3769 014706 
3770 014712 
3771 014716 
3772 

3773 014722 


3610 015024 


003074 


015026 


000002 


MUR6A: 
MJF6B : 


3 
MJR37: 


MJIR77A; 
; 


RTS1: 


RTS6: 


CEEELE LEM ee GEIRAIRS 5 


3038 


g 


BESPS RE 
1,R4 


BOSPS ,R6 


TEST RTS AND RTS R6 
MOV @STBOT ,R6 


MOV 
MOV 
RTS 


CMP 
BEQ 


#123456, -(R6) 
@RTS1,RS 

Ra 

el 


#123456 ,R3 
RTS6 
ol 


K6 
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= ee Be ee ee 


sRESET STACK 

sSETUP R4 — 

3JSR MODE 7 

sDATA FOR MODE 77 JUPP 

s VERIFY 1 SEQUENCE 

ST SEQUENCE 
SVERFIFY STACK WAS LOADED 


sVERIFY RETURN ADDRESS 
sBRANCH IF GOOD 


:CPU ERROR 
sMODE 37 FAILED 


sUPDATE SEQUENCER 
sRELOAD STACK 
sSETUP R4 TEST DATA 
3JSR MODE 6 


sVERIFY TEST SEQUENCE 
’ 


;VERFLIFY STACK WAS LOADED 


sVERIFY RETURN ADDRESS 
sBRANCH IF GOOD 


;CPU ERROR 
sMODE 77 FAILED 


sRESET STACK 


s INSURE VALID STACK 
sSETUP TEST REGISTER 
sSETUP TEST PC 

s@eTEST INSTRUCTION 


;CPU ERROR 
sINCORRECT PC ON RTS 


sBRANCH IF GOOD 


;CPU ERROR 
sREGISTER CONTENTS INCORRECT 


3 
sTHIS TEST CHECKS AN UN-TESTED PLA TERM 


R6,R1 
#1%,RS 
RE 

+1 


sSAVE STACK IN R1 
sMOVE EXPECTED RETURN ADOR TO RS 
sMOVE RETURN ADOR TO R6 


3 
;CPU ERROR 


ee a + ee + 
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SEQ 0076 
eecesececeee DOUBLE OPERAND TESTS seesecssesesseses . 
| 
3611 sERROR! RTS NOT EXECUTED 
38612 015026 021506 18: ci? CRS>,R6 sIS R6*31506? 
3813 015030 001401 BEQ RTSE 3IF IT IS THEN GO TO END OF TEST 
3814 015032 104001 ERROR ol sCPU ERROR 
sERROR! WRONG ADDR IN R6 
3816 015034 010106 RTSE: MOV R1,R6 sRESTORE STACK 
3820 015036 TSHMUO: 
3 SETUP AND TEST KERNEL, SUPERVISOR AND USER STACKS 
3822 015036 012737 040000 177776 MOV #40000 , 80177776 sSET PS TO SUP 
3823 015044 012 177777 MOV 0177777 ,R6 sINIT SUP STACK TO ALL ONES 
3824 015050 022706 177777 CMP 177777 ,R6 sARE ALL BITS SET 
3825 015054 001401 BEQ 1% sYES ON 
sNO GO TO ERROR 
3827 015056 104001 ERROR +1 sCPU 
3826 015060 005006 1%: CLR R6 sSET SUP STACK TO ALL ZEROES 
3829 015062 022706 000000 CMP @0 ,R6 sARE ALL BITS CLEARED 
3830 015066 001401 BEQ 2s sYES GO ON 
3NO GO TO ERROR 
3632 015070 104001 ERROR ol sCPU ERROR 
38633 015072 012706 125252 2s: MOV #125252 .R6 3SET SUP STACK TO ALTERNATING PATTERN 
3834 015076 022706 125252 CMP #125252, 3IS SUP SP CORRECT 
3835 015102 001401 BEQ 3% 3YES GO ON 
sNO GO TO ERROR 
3837 015104 104001 ERROR o1 3 
3838 015106 012706 052525 3%: MOV oR6 3SET SUP STACK TO ALTERNATING PATTERN 
3839 015112 022706 052525 CMP R6 31S SUP SP CORRECT 
3840 015116 001401 BEQ as sYES GO ON 
sNO GO TO ERROR 
3842 015120 104001 ERROR o1 3sCPU 
3843 015122 012706 000700 4%: MOV #700 ,R6 sSETUP SUP SP 
3844 015126 012737 140000 177776 MOV #140000, 9¢177776 3SET PS TO USER MODE 
3845 015134 012706 177777 MOV 177777 .R6 sINIT USER STACK TO ALL ONES 
3846 015140 022706 177777 CMP 0177777 .R6 sARE ALL BITS SET 
3847 015144 001401 BEG 5% sYES GO ON 
3648 NO TO ERROR 
3849 015146 104001 ERROR o1 ;CPU ERROR : 
3850 015150 005006 5%: CLR R6 > sSET USER STACK TO ALL ZEROES 
3651 015152 022706 000000 ChP @0 ,R6 sARE ALL BITS CLEARED 
3852 015156 001401 BEQ 6% ;YES GO ON 
3NO GO TO ERROR 
38654 015160 104001 ERROR «1 3sCPU 
3855 015162 012706 125252 68: MOV #125252 ,R6 3SET USER STACK TO ALTERNATING PATTERN 
3856 015166 022706 125252 CMP #125252 ,R6 3IS USER SP CORRECT 
3857 015172 001401 BEQ 7% sYES GO ON 
;NO GO TO ERROR 
3859 015174 104001 ERROR o1 ;CPU ERROR 
3860 015176 012706 052525 7%: MOV #52525 .R6 3SET USER STACK TO ALTERNATING PATTERN 
3861 015202 022706 052525 CMP #52525, 3IS USER By CORRECT 
01 001401 BEG 38$ :YES GO ON 
sNO GO TO ERROR 
38664 015210 104001 ERROR o1 :CPu E 
3865 015212 012706 8s: MOV ° 3 R 
38666 015216 005037 177776 CLR 00177776 3SET PS TO KER MODE 
3867 015222 012706 001000 MOV @STBOT, sSETUP KERNEL SP 
3866 015226 005037 000700 CLR 80700 ;CLEAR FIRST WORDS OF SUP, KER, AND USE STACKS 
3869 015232 005037 000600 CLR 8600 3 





ad 015236 


3906 
3907 0153574 
3908 015376 
3909 
3910 
3911 
3912 015400 
3913 015406 
3914 015412 
zeae 015416 


001000 
000054 
040000 


140000 
000000 
177776 


015246 


140000 
000044 
000000 


177776 
015246 


040000 
015334 


177776 


177776 


177776 


177776 


177776 


177776 


+1 


M6 
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eecsecoseese DOUBLE OPERAND TESTS eecccesescesesecs 


#140000, 90177776. 
R6 


rd) 

+1 
90177776 
@STBOT ,R6 
33 

ol 


MTSO 


; 
sROUTINE TO CHECK STACKS AFTER TWO RTS STATEMENTS 


;ROUTINE TO CHECK STACKS AFTER ONE RTS 


CLR 
JSR 

RET1: MOV 
BEQ 
ERROR 

18: MOV 
CHP 
BEQ 
ERROR 

2s: CLR 
CMP 
BEQ 
ERROR 

3%: 
JP 

: 

CHECK: MOV 
JSR 

RET2: CMP 
BEQ 
ERROR 

18: MOV 
Cmp 
BEQ 
ERROR 

2s: CLR 
CMP 
BEQ 
ERROR 

3%: RTS 

: 

CHECK1: MOV 
JSR 

RETS: CMP 
BEQ 

1 ERROR 

18: CLR 
CMP 
BEQ 
ERROR 

2s: MOV 
CMP 
BEQ 


#40000 , 80177776 :SET PSw TO SUP MODE 
»CHECK1 3; TEST . KER, AND USE STACKS 
° 3IS SUP STACK CLEARED 
1s : ON 
sNO GO TO ERROR 
ol ;CPU 
#140000 , 80177776 :SET PSwW TO USE MODE 
@0,(SP) 3IS USE STACK CLEARED 
:YES GO ON 
. SMO GO TO ERROR 
oe 
96177776 sSET PSwW TO KER MODE 
@RET1, (SP) ;00ES KER STACK HAVE CORRECT DATA 
3% ;YES GO ON 
3NO GO TO ERROR 
o1 ;CPU ERROR 
PC ;RETURN 


#140000 , 80177776 3SET PSW TO USE MODE 
PC ,CHECK2 ; TEST KER, SUP, AND USE STACKS 
#0, (SP) sIS USE STACK CLEARED 
\$ sYES GO ON 
sNO GO TO ERROR 

ol CPU ERROR 
00177776 sSET PSW TO KER MODE 
@RET1, (SP) :IS KER — CORRECT 
es YES GO ON 

: NO GO TO ERROR 

° 3 
#40000 , 80177776 sSET PSW TO SUP MODE 
@RET2, (SP) sIS SUP STACK CORRECT 
3$ YES GO ON 


sNO GO TO ERROR 


SEQ 0077 
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3927 015452 104001 ERROR +1 ;CPU ERROR 
3928 015454 000207 38: RTS PC ;RETURN 
3929 3 
3930 ;ROUTINE TO CHECK STACKS AFTER ZERO RTS 
3931 3 
3932 015456 022716 015412 CHECK2: CMP @RETS CSP) :IS USE STACK CORRECT 
3933 015462 001401 BEQ 18 ;YES GO ON 
sNO GO TO ERROR 
3935 015464 104001 ERROR ol ;CPU 
3936 015466 012737 040000 177776 1%: MOV #49000 , 80177776 3SET PSw TO SUP MODE 
3937 015474 022716 015334 CMP @RET2.(SP) 3IS SUP STACK CORRECT 
3936 015500 001401 BEQ 2s sYES GO ON 
3939 3NO GO TO ERROR 
3940 015502 104001 ERROR +1 
3941 015504 005037 177776 2s: CLR 90177776 ;SET PSW TO KER MODE 
3942 015510 022716 015246 CMP @RET1, (SP) :IS KER STACK CORRECT 
3943 015514 001401 BEQ 3% sYES GO ON 
3944 :NO GO TO ERROR 
3945 015516 1 ERROR 1 sCPU 
3946 015520 012737 140000 177776 3% MOV #140000 , 80177776 ;SET PSW TO USE MODE 
‘3947 015526 7 RTS PC ;RETURN 
3 
3949 015530 MTSO: 
se | 015530 MMVCC: 
3954 : TEST MOV CONDITION CODES - #20- 
3955 015530 000277 scc 3 
3956 015532 CLZ :CC=1011 
3957 015534 012704 000000 MOV @0,R4 3CC=0101, R4=0 
3958 015540 100403 BMI is s;ERROR IF N FLAG 
3959 015542 102402 BvS is sERROR IF V FLAG SET 
3960 015544 103001 Bcc 1$ sERROR IF C FLAG CLEAR 
3961 015546 001401 BEQ 2s ;SKIP IF Z FLAG SET 
3CC SHOULD=0101 
3963 015550 104001 1%: ERROR 1 ;CPU 
3964 015552 000277 2s: scc 
3965 015554 000251 : 1 :CC=0110 
3966 015556 012704 100000 MOV #100000 ,R4 sR4=100000, CC=1000 
3967 015562 001403 BEQ 3% sERROR 1F Z SET 
3966 01 102402 BvS 3% sERROR IF V SET 
3969 015566 103401 BCS 3$ sERROR IF C SET 
3970 015570 100401 BMI 4$ ;EXIT IF N SET 
3971 015572 104001 3%: ERROR ol ;CPU ERROR 
3972 3CC SHOULD= 1000 
3973 015574 4$: 
3974 
3975. 
3976 015574 MBTCC: 
3979 
3960 : TEST BIT CONDITION CODES - #s0- 
3961 015574 CLR R4 
3962 015576 005104 COM R4 3R42-1 
3963 015600 000277 scc 3 
3964 015602 CLZ 3CC#1011 
39865 015604 032704 000000 BIT 60 ,R4 3CC*0101 
3966 015610 100403 BMI 1% ;ERROR IF N FLAG 
3967 015612 102402 BvVS 1% ;ERROR IF V FLAG SET 


57 
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eceerseseeese DOUBLE OPERAID TESTS eeccecosesosoosos 


015716 
1 


32 
015716 
% 


015716 


015742 


100000 


177777 


077777 


18: 
2s: 


18: 
2s: 


4: 


18: 
26: 


sERROR IF C FLAG CLEAR 
sSKIP IF Z FLAG SET 


:CPu E 
sCC SHOULD=0101 
:€C*0110 


4 IF C SET 
3EXIT IF WN SET 
3;CPU ERROR 
:CC SHOULD= 1000 


TEST BIC CONDITION CODES - es0- 
CLR Ra 


0177777 ,R4 
q 


sR42-1 


F 
3CC*1011 

3CC*0101 

sERROR IF N FLAG 
sERROR IF V FLAG SET 
sERROR IF C FLAG CLEAR 
3SKIP IF Z FLAG SET 


3sCPU 
3CC SHOULD=0101 
sRGe-1 


3€C*0110 


8 C SE 
sEXIT IF N SET 
3CPU ERROR 
3CC SHOULD= 1000 


CL 3R420 

scc 

. 3CC*1001 

BIS @0 ,R4 3R420, CC*0101 
BMI 1% sERROR IF MINUS 
6vS 1% sERROR IF v SET 
ecc 16 sERROR IF C CLEAR 
BEQ 2s sQRANCH IF 

ERROR > 3CPU ERROR 

sec :8IS CC FAILED 


SEQ 0079 


C7 
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eecesecescee DOUBLE OPERAND TESTS coccccccececsooes s0 

4049 015744 000241 CLC 3€C*1110 

4050 015746 052704 100076 BIS #100076 ,R4 3842100076, CC=1000 

4051 015752 001403 BEQ 3% sERROR IF Z SET 
015734 102402 BvS 3% sERROR IF v SET 

4053 015756 103401 6cs 3% Ir C SET 

4054 015760 100401 BMI 4% ;BRANCH IF GOOD 

4055 015762 104001 33; ERROR ol sCPuU ERROR 

4056 3B8AD BIS CC 

4057 015764 4s: 

4058 

405 ' 

4062 015764 mpoccc 

406 

£054 : TEST DEC, INC CONDITION CODES 

4065 015764 012704 077777 OV 077777 ,.R4 gR4°277777 

4066 015770 000257 ccc 

4067 015772 000261 SEC sCC "0001 

4068 015774 005204 Inc Ra 3842100000, CC*0011 

4069 015776 001403 efQ 18 sERROR IF ZERO 

4070 016000 100002 BPL 18 sERROR IF POSITIVE 

4071 016002 102001 BvC 18 sERROR IF v CLEAR 

4072 016004 103401 6cs 2s sBRANCH IF GOOD 

4073 016006 104001 18: ERROR ol 3CPu ERROR 

4074 sINC FAILED 

4075 016010 000257 2s: ccc 

4076 016012 005204 INC Ra 3842100001, CC=1000 

4077 016014 103415 ecs 38 sERROR IF C SET 

40786 016016 102412 BvS 3$ sERROR IF v SET 

ab 005304 OEC Ba 3842100000, CC=1000 

4080 016022 102410 BvS 38 sERROR IF Vv 

4061 016024 105407 Ss 38 sERROR IF C SET 

4082 006277 scc 

4063 016030 -WORD 252 

4064 016032 005304 OEC RA 38477777, CC*1011 

4035 001403 62@ 36 sERCOR 

4066 016036 1 BvC 3$ sERROR IF v CLEAR 

4067 103001 ecc 3% sERROR IF C CLEAR 

4068 016042 100001 BPL 4% sGRANCH IF GOOD 

4069 016044 104001 38: ERROR el sCPu ERROR 

4090 3B8AD CC 

4091 016046 4$: 

4092 

4093 

aoe 016046 MCTSCC: 

4105 3 TEST CLR, TST, SWAB CONDITION CODES 

4106 § J OCCCOOOOSSEESSSOSSEESESSESSESSSSSSSEEEEEESSEESESEEEESESEEEESESS 

30100 - #000 - #200 

4107 016046 000277 scc 

4106 016050 000244 CLZ :€C*1011 

4109 016052 005004 CLR R4 38420, CC*0100 

4110 016054 100403 BMI 18 ’ MINUS 

4111 016056 102402 6vS 1% ERROR IF v SET 

4112 016060 103401 6cs 16 sERROR IF C SET 

4113 016062 001401 BEQ 2s sBRANCH IF GOOD 

4114 016064 104001 1%: ERROR ol 


D7 
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eeceeccecess DOUBLE OPERAND TESTS seccccccccosocccs SEQ 0061 


4116 016066 005104 2s: COM Pe sR4e-1 

4117 016070 000277 scc sCC*1111 

8118 016072 005704 TST Ra 3CC*1000 

4119 016074 001403 BEG 38 sERROR IF Z SET 
016076 1 Bvs 38 sERROR IF v SET 

4121 016100 103401 ecs 36 sERROR IF C SET 

4122 016102 100401 OnI 44 sQRANCH IF GOOD 

4123 016104 104001 33 ERROR ol sCPu 

4124 sB8AD TST CC 

4125 016106 000277 4t: scc sCCeilil 

4126 016110 000304 Sa R4 sCC*1000 

4127 016112 102402 Bvs 53 sERROR IF v SET 

4126 016114 103401 ecs be] sERROR IF C SET 

4129 016116 100401 BMI 6s sBRANCH IF GOOD 

4130 016120 106001 S$: FERVOR el 3;CPU ERROR 

4131 sBAD SWAB CC 

4132 016122 68: 

4133 

4134 

4137 016122 MADCC : 

4138 

4139 3 TEST ADD CONDITION CODES 

4140 016122 012704 077777 MOV 077777 ,R4 3R4277777 

4141 016126 012701 000001 MOV #1,R1 sRi91 

4142 016132 000257 ccc 3CC=0000 

4143 016134 060401 ADD R4,R1 377777 + 1 = 100000 IN R1 

4144 016136 102003 BvC 18 sERROR IF V CLEAR 

4145 016140 103402 ecs 1% sERROR IF CARRY 

4146 016142 001401 BEQ 1s sERROR IF Z SET 

4147 016144 100401 BMI es sBRANCH IF GOOD 

4148 016146 104001 18: ERROR ol sCPU ERROR 

4149 3CC SHOULD =1010 

4150 016150 005204 2s: INC Be 3R4=100000 

4151 016152 060401 ADD R4,R1 3100000 + 100000 = 0 IN Ri 

4152 016154 1 BvC 3% sERROR IF V CLEAR 

4153 016156 103001 Bcc 3% ERROR IF CARRY CLEAR 

4154 016160 001401 BEQ 4 ; BRANCH 

4155 016162 104001 38: ERROR +1 3 ERROR 

4156 sCC SHOULD = O111 

4157 0 060401 44 ADD R4,R1 30 + 100000 = 100000 

4156 016166 102402 BvVS S$ sERROR IF Vv SET 

4159 016170 103401 ecs 5¢ sERROR IF SET 

4160 016172 100401 BMI 66 sBRANCH IF GOOD 

4161 016174 104001 S$: ERROR +1 3sCPU ERROR 

4162 3CC SHOULD = 1000 

4163 016176 6%: 

ree 

4165 

4168 016176 MACCC: 

4169 

4170 F TEST ADC CONDITION CODES 

4171 016176 012704 177777 MOV 177777 ,R4 3842177777 

4172 016202 000277 scc :CCe1111 

4173 016204 005504 ADC Ra sR420 CC*0101 

4174 016206 100403 BMI 1% sERROR IF MINUS 

4175 016210 102402 BVS 1% sERROR IF v SET 

4176 016212 103001 Bcc 1s s;ERROR IF C SET 


a relia eee ee 


E7 
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4232 

4233 016350 
4234 016352 
4235 016354 


077777 


077777 


077777 
170000 


1$: 
2s: 


38%: 
4$: 


1%: 
2s: 


3%: 
4$: 


S¢: 
6%: 


BEQ 2s sBRANCH IF GOOD 
ERROR +1 :CPU ERROR 

3B8AD ADC 
MOV @077777,R4 3R4*077777 
scc r 
CLV 3€C#1101 
ADC R4 3R4*100000 CC=1010 
BPL 3% sERROR IF PLUS 
BCS 3% sERROR IF C SET 
BEQ 3% sERROR IF ZERO 
BVS 4% sBRANCH IF GOOD 
ERROR ol ;CPU ERROR 

3BAD ADC 
scc sCC#1111 
ADC R4 3R4*100000 CC=1000 
BvS S$ sERROR IF V SET 
BCS 5$ sERROR IF C SET 
BMI 6% sBRANCH IF GOOD 
ERROR +1 


:CPU ERROR 
sBAD ADC CC SHOULD= 1000 


TEST NEG, CMP, COM CONDITION CODES 
MOV €077777 ,R4 


3R4°77777 
ccc 3CC=0000 
NEG R4 3R4=100001 CC=1001 
BvS 1s sERROR IF V SET 
BCC 1% sERROR IF C CLEAR 
BEQ 1% sERROR IF Z SET 
BMI 2s sBRANCH IF GOOD 
ERROR +1 sCPu E 
sBAD NEGATE 
CLR R4 3R420 
ccc 3CC*0000 
NEG R4 3CC*0101 
BMI 3% sERROR IF N SET 
BCS 38 sERROR IF C SET 
BvS 3% sERROR IF V SET 
BEQ 4s sBRANCH IF GOOD 
ERROR +1 sCPU 
38AD NEG 
MOV 077777,R4 3R4277777 
MOv #170000 ,R1 sR1*170000 
ccc sCC*0000 
CMP R4,R1 377777 - 170000 = 107777 CC= 1011 
BvC S$ sERROR IF v CLEAR 
Bcc S$ sERROR IF C CLEAR 
BEQ Sh sERROR IF ZERO 
I 6% sBRANCH IF GOOD 
ERROR +1 :CPU ERROR 
3B8AD CMP 
ccc 
COM R1 3R1°7777 


BMI 7$ sERROR IF MINUS 


SEQ 0062 





Ase? 
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eeeseeeeeees DOUBLE OPERAND TESTS seeceeesecosccoss SEQ 0083 


4236 016356 001402 BEQ 7% sERROR IF ZERO 
4237 016360 103001 Bcc 7$ sERROR IF CARRY 
4238 016362 102001 BvCc 83 sBRANCH IF GOOD 
4239 016364 104001 73 E +1 3;CPU E 
sBAD COM 
4241 016366 000277 83 scc 
4242 016370 005101 COM R1 
4243 016372 100401 BMI 10% sBRANCH IF GOOD 
4244 016374 104001 9%: ERROR +1 sCPU ERROR 
4245 sBAD COM 
4246 016376 108%: 
4247 
4248 
4251 016376 MSBCC: 
4252 
4253 3 TEST SUB CONDITION CODES 
4254 016376 012704 077775 MOV 077775 ,R4 384277775 
4255 016402 000257 ccc sec 20000 
4256 016404 162704 137757 SUB 137757 ,R4 377775 - 137757 
4257 sTRY TO ~~ AN ARITHMETIC OVERFLOW 
4258 016410 102003 BvC 1% sERROR IF V CLEAR 
4259 016412 100002 BPL 1s sERROR IF RESULT IS POSITIVE 
4260 016414 001401 BEQ 1$ sERROR IF Z SET 
4261 016416 103401 ecs es sBRANCH IF GOOD 
4262 016420 104001 1%: ERROR 1 
4263 3BAD SUBTRACT 
4264 016422 012704 000005 2s: MOV #5 ,,R4 3R425 
4265 016426 000257 ccc 3CC=0000 
4266 016430 162704 000012 SUB #12,R4 35-12=*-5 AND SETS CARRY 
4267 016434 103003 Bcc 38 sERROR IF CARRY CLEAR 
4268 016436 102402 BvS 3% TERROR IF OVERFLOW 
4269 016440 001401 BEQ 3% sERROR IF ZERO 
4270 016442 100401 BMI aS sBRANCH IF GOOD 
4271 016444 104001 3%: ERROR +1 3;CPU ERROR 
4272 sSUBTRACT FAILED 
4273 016446 4%: 
4274 
4275 
4278 016446 mSBCCC: 
4279 
4280 : TEST SBC CONDITION CODES 
4281 016446 012704 100000 MOV #100000 ,R4 3R4*100000 
4262 016452 000257 ccc 3C=0000 
4283 016454 005604 SBC R4 sTRY TO SET V 
4264 016456 100006 BPL 1s sERROR IF N CLEAR 
4285 016460 102405 BvS is sERROR IF v SET (HAVENT SET C YET) 
42866 016462 000261 SEC 3CC SHOULD = 1001 
4267 016464 005604 SBC R4 i TRY AGAIN TO SET V 
4268 016466 102002 BvC 1% s;ERROR IF V CLEAR 
4269 016470 103401 ecs 1% sERROR IF C SET 
4290 016472 100001 BPL 2s s;BRANCH IF GOOD 
4291 016474 104001 1%; ERROR +1 ;CPU ERROR 
4292 3SBC FAILED 
4293 016476 005004 2s: CLR Ra iR4= 
4294 016500 000277 scc 
4295 016502 000241 cic 3CC#1110 


4296 016504 005604 sec R4 sTRY TO CAUSE C FLAG FAILURE 
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SEQ 0064 
eecceceeeees DOUBLE OPERAND TESTS seececsscososcescs 

4297 016506 103410 ecs 3% sERROR IF C SET 
4296 016510 102407 BVS 3% PERL OR 
4299 016512 001006 BNE 3% sERROR IF NOT ZERO 
4300 016514 000261 SEC 3 SET 
4301 016516 005604 sec Bs sNOW, O - CARRY = 177777 
4302 016520 103003 Bcc 3% sERROR IF CARRY CLEAR 
4303 016522 102402 avs 3% sERROR IF V SET 
4304 016524 001401 BEQ 3% sERROR IF 
4305 016526 100401 BMI 4s sBRANCH IF GOOD 
4306 016530 104001 3%: ERROR ol sCPU ERROR 
4307 3SBC FAILED 
4308 016532 43%: 
4309 
4310 
4313 016532 MRLCC 
4314 
4315 3 TEST ROL CONDITION CODES 
4316 016532 012704 060000 MOV #60000 , R4 #R4= 0110000000000000 
4317 016536 000257 ccc 3sCC=0000 
43186 016540 006104 ROL | Re. R42 11 
4319 016542 103402 ecs ; 18 sERROR IF CARRY 
4 016544 102001 Bvc / i$ sERROR IF Vv CLEAR 
4321 016546 100401 BMI 2s sBRANCH IF GOOD 
4322 016550 104001 1%: ERROR o1 3CPU 
4323 sROL FAILED 
4324 006104 2s Ra sR4= 1 
4325 016554 103002 Bcc 3% sERROR IF CARRY CLEAR 
4326 016556 102401 BvS 3% sERROR IF v SET 
4327 016560 100401 BMI as sBRANCH IF GOOD 
a4 016562 104001 3% ERROR +1 = 

3 
4330 016564 606104 4S RS 3R4 = 0000000000000001 
4331 016566 102003 BvC 5% sERROR IF Vv CLEAR 
4332 016570 103002 Bcc Ss sERROR IF C CLEAR 
4333 016572 100401 BMI 5% sERROR IF MINUS 
4334 016574 001001 BNE 6% 3;BRANCH IF GOOD 
aoe 016576 104001 S$ ERROR 1 sCPuU & 
4337 006104 6% R4 3R4e 
4338 016602 102402 BvVS 7% sERROR IF V SET 
4339 016604 103401 ecs 7$ sERROR IF C SET 
4340 016606 100001 BPL 8s sBRANCH IF GOOD 
4341 016610 104001 7$: ERROR +1 :CPU E 
4342 3BAD 
4343 016612 8%: 
4344 
4345 . 
4348 016612 MRRCC: 
4349 
4350 F TEST ROR CONDITION CODES 
4351 016612 012704 000003 @3,R4 3R4= 0000000000000011 
4352 016616 000257 ccc sCC= 0000 
4353 016620 006004 ROR RA iR4= 1 
4354 016622 103002 Bcc 1% sERROR IF NO CARRY 
4355 016624 102001 BvC 1% sERROR IF V CLEAR 
4356 016626 100001 BPL ra) ;BRANCH IF GOOD 


4357 016630 104001 16: ERROR +1 sCPU ERROR 





—_ - eee ee ee SC eee - ae ee 6 eee ee ee oe 


H7 
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SEQ 0085 
eeceeeseceso DOUBLE OPERAND TESTS eeccecesesesoseses 
4356 sROR FAILED | 
4359 016632 006004 2s: RGR ha 3R4= 1000000000000000 
4360 016634 103002 Bcc 33 sERROR IF CARRY CLEAR 
4361 016636 102401 BvS 38 sERROR IF V SET 
4362 016640 100401 BMI as sBRANCH IF GOOD 
4363 016642 104001 38: ERROR 1 sCPU 
ae 3 ROR 
4365 016644 006004 4s: FOR Ra sR4 = 1100000000000000 
4366 016646 102002 BvC 5$ sERROR IF V 
4367 016650 103401 ecs Ss sERROR IF C SET 
4368 016652 100401 BMI 6$ sBRANCH IF GOOD 
4369 016654 104001 S$: ERROR 1 sCPU 
4370 ’ ROR 
4371 016656 006004 68: ROR Ra sR4= 011000000000000 
4372 016660 6vS 7$ sERROR IF Vv SET 
4373 016662 103401 6cs 7$ sERROR IF C SET 
4374 016664 100001 BPL 83 sBRANCH IF GOOD 
4375 016666 104001 7%: ERROR +1 sCPU 
4376 sBAD 
4377 016670 8s: 
4378 
4379 
4382 016670 xCBIT: 
4391 
a 3 TEST C BIT WITH ROR/ROL 
4393 38 gO Fy eae 
sTHIS TEST IS TO CHECK FOR A SLOW C hy H INTERNAL TO THE J11 DATA CHIP 
;PROBLEM IS ONLY EXHIBITED ON EARLY MASK cETS (1590 AND 1593) 
4394 016670 012701 052525 MOV #52525 ,.R1 sINIT R1 WITH DATA 
4395 016674 000241 cic sCLEAR THE C BIT 
4396 016676 006001 ROR fy 3R1*025252. C BIT =1 
4397 016700 006001 its R1 sR1*112525, C BIT =0 
4396 016702 006001 ROR R1 sR1°04S252. C BIT =1 
4399 016704 103401 ecs 1s sBRANCH IF CARRY BIT SET 
4400 016706 104001 ERROR +1 3;CPU ERROR 
4401 016710 022701 045252 1%: CMP #45252 ,.R1 3IS DATA IN R1 = TO EXPECTED DATA? 
4402 016714 001401 BEQ 2s sBRANCH IF YES 
4403 016716 10400 ERROR 1 sCPU ERROR 
4404 016720 012701 125252 2s: #125252 ,R1 sSET 
4405 016724 1 CLC sCLEAR THE CARRY BIT 
4406 016726 006101 ROL R1 3R1°052524, C BIT =1 
4407 016730 006101 ROL Ri #R1*125251., C BIT =0 
4406 016732 006101 ROL R1 #R1*°0S2522, C BIT =1 
4409 016734 103401 6cs 3% sBRANCH IF CARRY SET 
4410 016736 104001 ERROR 1 ;CPU ERROR 
4411 016740 022701 052522 3%: CMP #052522, R1 :IS DATA IN Ri = TO EXPECTED DATA? 
4412 016744 001401 BEQ 4% 
4413 016746 104001 ERROR +1 3;CPU ERROR 
rs 016750 4s 
fase 016750 MALCC 
4420 ; TEST ASL CONDITION CODES 
4421 016750 012704 060000 ° 3R4= 0110000000000000 
4422 016754 7 ccc sCC=0000 
4423 016756 304 ASL Ra 3C*0 R&- 11 


006 
4424 016760 103402 BCS 1s sERROR IF CARRY 
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eeeeeseceeee DOUBLE OPERAND TESTS seeceessccssseoes 


4425 016762 


4426 

4429 016770 
4430 016772 
4431 016774 
4432 016776 


000341 


100001 


4469 

4470 017066 
4471 017070 1 
4472 017072 
4473 017074 
4474 017076 
4475 

4476 017100 
4477 017102 
4476 017104 
4479 017106 
44860 017110 
4461 017114 
4462 017116 
4465 


170016 


TEST ASR CONDITION CODES 
MOV 0341 ,R4 


ccc 


7$ 
#170016 ,R4 
8s 
+1 


ba 


1BR 
:CPU ERROR 
sASL FA 
sC*l R&e= 1 
8 IF CARRY CLEAR 


FAILED | 
3R4= 1000000001110001 
3®4= 1100000000111000 
sERROR IF CARRY CLEAR 
sERROR IF v SET 
IF GOOD 


sR4* 1110000000011100 
ERROR IF V 


’ 
sERROR IF C SET 
s;BRANCH IF GOOD 


sR4= 1111000000001110 
sERROR IF v CLEAR 
sERROR IF C SET 
sERROR IF PLUS 

sSEE IF EXPECTED RESULT 
sBRANCH IF GOOD 

CPU 
3BAD ASR 
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eeeeeeeseses DOUBLE OPERAND TESTS seecesesececccses 


017120 


12 
017170 
4 


S 
017170 


017170 


017214 
017216 


012704 


123456 


123456 
052525 


MSXTCC: 


1%: 
2s: 


1%: 
2s: 


3%: 
4%: 


TEST SXT CONDITION CODES / -#0- 
MOV #123456 ,R4 


3R4=123456 
MOV ° sSAVE CONTENTS 
ccc 3CC #0000 
SXxT R4 3R420 CC=0100 
bcs is sERROR IF Y 
1% sERROR IF 
BVS 1s sERROR IF OVERFLOW 
BEQ es ; F 
ERROR 1 ;CPU ERROR 
3BAD SXT 
R1,R4 sRESTORE R4 
c 3CC#1111 
SxT R4 sR42-1 CC*1001 
BEQ 3% sERROR IF ZERO 
3$ sERROR IF 
BCC 3% sERROR IF NO CARRY 
BvS 3$ sERROR IF OVERFLOW 
COM R4 3R420 
BEQ 4$ s;BRANCH IF GOOD 
ERROR el ;CPU ERROR 
sBAD SXT 


TEST XOR CONDITION CODES / #e0- 
MOV #123456 ,R4 


3R4=123456 
MOV oR1 3R1*S2525 
ccc 3CC=0000 
XOR R1,R4 3@TIe R4*171173 
BvVS y 33ERROR IF OVERFLOW 
BEQ 1s sERROR IF ZERO 
BcSs ié sERROR IF CARRY 
BMI 2$ sBRANCH IF GOOD 
ERRUR +1 s;CPU ERROR 
3BAD XOR 
MOV #125252,R1 3R1*125252 
scc 3CC#1111 
XOR R1,R4 3R42054321 
BMI 3% sERROR IF MINUS 
BEQ 3% s;ERROR IF ZERO 
Bcc 3% s;ERROR IF CARRY CLEAR 
BvC 43 ;BRANCH IF GOOD 
ERROR +1 ;CPU ERROR. 
;BAD XOR 

xOR R4,R4 sR4= 
BVS S$ ,;ERROR IF OVREFLOW 
BMI S$ sERROR IF MINUS 
Bcc 5% sERROR IF NO CARRY 

S$ ;ERROR IF NOT ZERO 


al + bi 
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022704 000000 
001401 


4545 017252 

4546 017256 

4547 017260 
548 


Ss2 
4564 017262 


4602 
4603 017360 005000 S$: 


177777 


4606 

4607 017370 
4608 017374 
4609 017376 


177777 


104001 S$: 
4549 017262 6$: 


104001 1%: 
000277 2s: 
000250 


104001 3%: 


177777 4%: 


CMP #0 ,R4 sSEE IF EXPECTED RESULT 
BEQ 6% sBRANCH IF GOOD 
ERROR +1 sCPU ERROR 

sBAD XOR 


TEST SXT (SIGN EXTEND INSTRUCTION) 


2S SPOKSAHESEHKEESSSESHHESCEREESHLEHAHHESASHEHSHALRERAHHSHRHAEKERESS HEAD 


;THE PROBLEM IS = EXHIBITED ON EARLY MASK SETS (1590 OR 1593) 
CLR s TRASH R4 


ccc iCC#0000 
-WORD 271 3CC=100 
SxT Pa 3*TEST INSTRUCTION 
BvS 1$ sBRANCH IF OVERFLOW IS NOT CLEARED 
is IBRANCH IF N BIT EFFECTED 
BcQ 1$ sBRANNCH IF Z BIT EFFECTED 
3cc 2° IBRANCH IF C BIT EFFECTED 
BEQ ra) sBRANCH IF R4 =0 
ol 3 ERROR 
sCC SHOULD HAVE = 1101 

scc 
CLN 3CC#0111 
CLR 
MOV #55,(R4) s TRASH R4 
SxT (R4) s*#TEST INSTRUCTION 
BNE 3% sBRANCH IF BIT EFFECTED 
BvS 3¢ sBRANCH IF OVERFLOW 
Bcs 3% 8 

ng 3% sBRANCH IF N IS SET 
TST (R4) sVERIFY INSTRUCTION WORKED 
BEQ ag sBRANCH IF R420 
ERROR +1 


CPU 
3SXT FAILED 
NOW TEST FOR SLOW N BIT IN Jil DATA CHIP 


#-1,R0 3R0°177777, N BIT = 1 
CLR Ra SCLEAT THE N BIT 
SxT RO seeeeTEST INSTRUCTIONess 
sTEST N BIT TRANSITION 1 TO O 
TST RO sRO SHOULD = 0 
BEG 5% sBRANCH IF OK 
ERROR +1 sCPU ERROR 
CLR RO =. RO, N BIT = O 
MOV @-1,R4 ;SET N BIT 
SxT RO 3@eeTEST INSTRUCTIONes 
; TEST N BIT TRANSITION. 07TO1 
@-1,R0 3RO SHOULD = 177777 
BEA 6 : BRANCH IF OK 
ERROR 1 3;CPU ERROR 





Cr 
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SEQ 0089 
eeceeeeeseses DOUBLE OPERAND TESTS seceesecesesscoos 
| 
4610 017400 6$: 
4612 ‘ 
4614 017400 MXOR : 
4615 
4616 3 TEST XOR 
4617 017400 012701 007645 MOV €7643,R1 sSETUP DATA 
4616 017404 012704 1533555 MOV @133333,R4 sSETUP DATA 
4619 017410 000277 scc 
4620 017412 074401 xOR R4,R1 s*TEST INSTRUCTION 
4621 017414 100006 BPL 1s sBRANCH IF —_— TO ERROR 
4622 017416 001405 BEQ 1s sERROR IF ZERO 
4623 017420 103004 BCC 1$ sERROR IF oat CLEAR 
4624 C17422 1024035 BvS sERROR IF V SET 
4625 017424 020127 134570 CMP R1,0134570 s VERIFY oe RESULT 
4626 017430 001401 BEG sBRANCH I 
4627 017432 108001 1%: ERROR +1 sCPU ERROR 
4628 sBAD XOR 
4629 017434 010102 2s: MOV R1,R2 
4630 017436 000257 ccc 
4631 017440 074402 R4 ,R2 s*TEST INSTRUCTION 
017442 100405 BMI $ sERROR IF MINUS 
4633 017444 102404 BvS 3% FERROR IF oe 
4634 017446 103403 s sERROR IF CARR 
4635 017450 020227 007643 R2, 07643 
4636 017454 001401 BEQ sBRANCH IF GOOD 
4637 017456 104001 3$: ERROR +1 sCPu E 
4638 3BAD XOR 
4639 017460 4$: 
464) 
Coated ; 
4644 017460 SOB 
4545 
A645 3 TEST SOB 
4647 017460 012704 000555 MOV #555 ,24 sSETUP TEST COUNTER 
4646 017464 000277 scc 3CC#17 
4649 017466 103015 1%: BCC 2s sERROR IF CARRY CLEAR 
4650 017470 102014 BvC es sERROR IF NO OVERFLOW 
4651 017472 1000135 2s sERROR IF PLUS 
4652 017474 001012 BNE $ 
4653 017476 077405 R4,18 s*TEST INSTRUCT 
17500 103005 Bcc ‘ 3 IF CARRY CLEAR 
4655 017502 102004 BvC 3$ sERROR IF NO OVERFLOW 
4656 017504 100003 BPL 3$ sERROR IF PLUS 
4657 017506 001002 BNE ae sERROR IF ZERO 
4658 017510 000167 000010 Pp as 
4659 017514 104001 3%: ERROR +1 sCPU ERROR 
4660 sCC EFFECTED DURING TEST 
4661 017516 000167 000002 JP 4 
4662 017522 104001 2s: ERROR +1 ;CPU ERROR 
4663 sCC EFFECTED AFTER TEST 
4664 017524 020427 000000 4%: CMP R4,00 sIS R4 CORRECT 
4665 017530 001401 BEQ S$ YES GO ON 
4666 017532 104001 ERROR o1 sCPU ERROR 
4667 sNO GO TO ERROR 
4668 017534 S$: 
4669 


M7 
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4726 017674 
30 


TEST CLEAR CONDITION CODES INSTRUCTION 


SEQ 0090 
eesesececece DOUBLE OPERAND TESTS seeeseccecesesess 

4673 017534 MMARK ; 
4674 
a6 3 MARK INSTRUCTION TEST 
4676 0175384 012 000700 MOV @STBOT -100,SP sSETUP TEST STACK = 700 
4677 017540 012737 125252 000776 MOV #125252 ,8@STBOT-2 sSET UP NEW RS VALUE ON STACK 
4676 017346 012 017564 MOV #18 ,R5 sPUT NEW PC IN RS 
4679 017552 012746 0064357 MOV @MARK +37, -( SP) s INSERT MARK 37 INSTRUCTION ONTO STACK 
4680 017556 000277 scc 
4681 017560 000116 JP (SP) 3@ TEST INSTRUCTION 

sMARK INSTRUCTION SHOULD HAVE GONE TO 1% 
4683 017562 104001 ERROR o1 ;CPU ERROR 
AGB4 3 
4685 017564 101002 1%: BHI 2s sERROR IF C OR Z BIT CLEAR 
4686 017566 100001 BPL 2s sERROR IF N BIT CLEAR 
4687 017570 102401 BVS 3% sBRANCH IF V BIT SET 

sB8AD CONDITION CODES ON MARK 
4689 017572 104001 2s: ERROR o1 sCPU 
4690 017574 022705 125252 38: CMP #125252 ,R5S sVERIFY RS 
4691 017600 001401 BEQ 4$ sBRANCH IF GOOD 
rote 017602 104001 ERROR +1 :CPU 
4694 017604 020627 001000 4$: CMP SP ,@STBOT ;VERIFY THAT STACK IS CORRECT 
4695 017610 001401 BEQ 5$ 3 
46 ;ERROR! STACK WAS NOT CORRECT AFTER MARK 
pened 017612 104001 ERROR +1 ;CPU ERROR 
4699 017614 012746 052525 15%: MOV #52525, -( SP) sSETUP EXPECTED RS 
4700 017620 012746 006400 MOV €6400, - sMOVE MARK O INSTRUCTION ON STACK 
4701 017624 010605 MOV SP, sRS*ADORESS OF INSTRUCTION 
4702 017626 004767 000004 JSR PC,5$ sLEAVE 6$ ON STACK 
panes 017632 000167 000006 6$: Jp 16% sMARK RETURNED CORRECTLY 
4705 017636 000257 S$: ccc sCLEAR THE CONDITION CODES 
4706 017640 000205 RTS RS sRETURN TO MARK INSTRUCTION 
4707 sNEXT INSTRUCTION ON STACK IS THE RETURN 
4708 3FROM THE JSR 
4709 ;ERROR! BAD MARK SEQUENCE 
pokes 017642 104001 ERROR ol 3;CPU ERROR 
4712 017644 101402 168: BLOS 7% 3IS C OR Z BIT SET? 
4713 017646 100401 BMI 7% 3IS N BIT SET? 
4714 017650 102001 BvC 8$ 3IS V BIT SET? 
471 sERROR! CONDITIONS CODES INCORRECT 
srt 017652 104001 78: ERROR +1 ;CPU ERROR 
4718 017654 7 001000 8s: CMP R6, @STBOT 3IS THE STACK CORRECT? 
4719 017660 001401 BEQ sBRANCH IF YES 
4720 sERROR! BAD STACK CLEANUP 
4721 017662 104001 ERROR o1 :CPU ERROR 
4722 017664 022705 052525 9%: CMP #52525 ..R5 sVERIFY THAT RS WAS LOADED PROPERLY. 
4723 017670 001401 BEQ 10% ;IF OK, GO TO NEXT TEST 
4724 FERROR ! RS WAS NOT CORRECT AFTER MARK. 
4725 017672 104001 ERROR. 1 ;CPU ERROR 
4726 017674 10%: 

XE 100 





4732 017674 
4733 017702 
4736 017714 
4737 
4738 017716 
4739 
4741 017716 
4743 
a7aa 
4745 017716 
4746 017724 
4747 017726 
4746 017734 
4749 
4750 017736 
4751 017740 
4752 
4755 017740 
47356 
4757 017740 


4761 017760 
4762 
4763 017762 
4764 
4767 017762 
4768 
4769 017762 


4770 017770 
ys | 017772 


012737 
000257 
022737 


001401 
104001 


030017 
030000 


030017 
030016 


030017 
030007 


030017 
030015 


030017 
030013 


030000 
030017 


177776 
177776 


177776 
177776 


177776 
177776 


177776 
177776 


177776 
177776 


177776 
177776 


XME101: 


TE102: 
3 


TE104: 
$ 


N7 
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MOV #30017 ,80177776 sSETUP PSW 
ccc s_ TEST INSTRUCTION 
CMP #30000 , 80177776 s0ID IT CLEAR ALL CONDITION CODE BITS 
BEQ 1% YES GO ON 
ERROR +1 CPU ERROR 
sNO GO TO ERROR 


i CLEAR C BIT INSTRUCTION 


#30017 ,80177776 sSETUP PSW. 
cLC ;_ TEST INSTRUCTION 
CMP #30016 , 80177776 sDID IT CLEAR CARRY BIT 
BEQ 1% sYES GO ON 
3C BIT NOT CLEAR GO TO ERROR 
ERROR +1 CPU ERROR 


TEST CLEAR: N BIT INST (CLN) 
MOV 


HOV @30017, 80177776 
CMP @30007 , 90177776 
BEQ 18 
ERROR ol 


TEST CLEAR V BIT INST (CLV) 
MOV 


sSETUP PSW 

; TEST INSTRUCTION 

s0ID IT CLEAR NEGATIVE BIT 
;YES GO ON 


3;CPU 
3NO GO TO ERROR 


#30017 , 80177776 sSETUP PSW 
CLv s_ TEST INSTRUCTION 
CMP #30015 ,80177776 s0ID IT CLEAR OVERFLOW BIT 
BEC 1$ YES GO ON — 
ERROR +1 ;CPU ERROR 
3NO GO TO ERROR 


TEST CLEAR Z BIT INST (CLZ) 
MOV 


#30017 , 80177776 sSETUP PSW 
CLZ ; TEST INSTRUCTION 
CMP #30013, 80177776 s0I0 IT aan ZERO BIT 
BEQ 1$ sYES GO ON 
ERROR +1 3;CPU ERROR 
3NO GO TO ERROR 


Ln SET ae nee oe INST (SCC) 


, 8017777 sSETUP PSW 
scc ;_ TEST INSTRUCTION 
CMP #30017, 80177776 sD0ID IT SET ALL CONDITION CODE BITS 
BEQ 1s YES GO ON 
ERROR +1 CPU ERROR 
sNO GO TO ERROR 
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eeceeeesesee DOUBLE OPERAND TESTS seeccescosecoseses 


4799 020050 
4800 


030000 
030001 


030000 
030010 


030000 
030002 


030014 


030012 


177776 
177776 


177776 
177776 


177776 
177776 


177776 
177776 


177776 


177776 


177776 


18: 

o 
TE106: 
a 


18: 

3 
TE107: 
3 


18: 

3 
TE110: 
3 


18%: 

a 
TE111: 
4 


16: 

3 
TEL12: 
$ 


16: 


TEST SET C BIT INST (SEC) 
we @30000 , 80177776 


CoP 030001 , 80177776 
BEQ 18 
ERROR +1 


TEST SET WN BIT INST (SEN) 
wd @30000 , 80177776 
cep ee ee 


Bro 
ERROR +1 


TEST SET Vv BIT INST (SEV) 
MOV @30000 , 80177776 


sSETUP PSw 

s TEST INSTRUCTION 
s0I0 IT SET THE CARRY BIT 
sYES GO ON 


iCPu ERROR 
sNO GO TO ERROR 


sSETUP PSwW 

s TEST INSTRUCTION 

s019 IT SET THE NEGATIVE BIT 
sYES GO ON 


sCPU ERROR 
sNO GO TO ERROR 


sSETUP PSU 


SEV s TEST INSTRUCTION 
Cor 030002 , 80177776 sDID IT SET THE OVERFLOW BIT 
6FQ is sYES GO ON 
ERROR +1 CPU ERROR 
sNO GO TO ERROR 


TEST SET Z BIT INST (SEZ) 
MOV @30000 , 80177776 
SEZ 

cer 


sSETUP PSw 
3s TEST INSTRUCTION 


030004 , 80177776 3010 IT SET THE ZERO BIT 
BFQ 18 3YES GO ON 
ERROR ol 3CPu ERROR 
sNO GO TO ERROR 
TEST PAL TIPLE CLEARS OF CC BITS 
MOV #30000 , 80177776 sINIT PSW 
scc sSETUP PSw 
.WORD 243 3s TEST CLC CLV 
CHP 030014 ,80177776 3sPSW CORRECT? 
BEG 1s sVYES GO 
ol 3sCPu ERROR 
sNO GO TO ERROR 
scc sSETUP PSwW 
.WORD 245 s TEST CLC CLZ 
Crp 030012 ,80177776 3 
BEQ 28 sYES GO 
ERROR el :;CPU ERROR 
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366 
4910 020370 


000277 
000246 


030011 


030010 


030003 


030002 


030001 


030000 
030003 


MACRO M1200 


177776 


177776 


177776 


177776 


177776 


177776 


177776 


177776 


177776 
177776 


2s: 


38: 


53: 


7%: 


9%: 


108: 


Q 
TELLS: 
F 


C& 
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scc sSETUP PSw 
-WORD 246 s TEST Civ CLZ 
cep @30011,80177776 sPSW CORRECT? 
BEQ 3$ sYES GO ON 
ERROR +1 

sNO GO TO ERROR 
scc sSETUP PSu 
.WORD 247 s TEST GC Civ CLZ 
chp 030010 ,80177776 3sP6W CORRECT 
BEQ ee sYES GO ON 

sNO GO TO ERROR 
scc sSETUP PSu 
-WORD 251 s TEST CLN CLC 
chp 030006 , 80177776 1PSid 
BEG - sYES 

3NO GO TO ERROR 
scc sSETUP PSu 
‘ 252 3s TEST CLN CLV 
cep 030005 80177776 8 CORRECT 
BEG 68 sYES GO ON 
ERROR +1 CPu ERROR 

3NO GO TO ERROR 
scc 3SET 
" 253 s TEST CLN CLC CLV 
cep 030004 , 80177776 3 cT 
BEQ 7$ sYES GO ON 
ERROR +1 

3NO GO TO ERROR 
scc sSETUP PSu 
. 254 s TEST CLW CiZ 
coe #30003 , 80177776 PS cT? 
ef Bs sVYES GO 

ol 3;CPU ERROR 

3NO GO TO ERROR 
scc 
. 255 s TEST CLN CLC CiZ 
Che 30002 , 80177776 3 cT 
BEQ os sYES GO ON 
ERROR +1 

sNO GO TO ERROR 
scc 3SET 
a 256 3s TEST CLN CLV CLZ 
CMP 930001 , 80177776 sSETUP PSw 
BEQ 10% sYES GO ON 

ol 

:NO GO TO ERROR 
TEST PALTIPLE SETS A A BITS 
“OV #30000 , 80177 sINIT PSw 
. BORD 263 3 TEST SEC SEV 
chp 030003 ,60177776 sPSW CORRECT? 
BEG is sYES GO ON 
ERROR +1 :CPU ERROR 


SEQ 0093 


000257 


COXKDACO KDJ11-8 CLUSTER DIAG. 
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030005 


030007 


030011 


030012 


030013 


030014 


030015 


030016 


D8 
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177776 


177776 


177776 


177776 


177776 


177776 


177776 


177776 


177776 


18: 


2s: 


38: 


4%: 


5$: 


68: 


78; 


96; 


108: 
$ 


ccc 
WORD 


265 
030005 , 80177776 
a 


266 
030006 , 80177776 
3$ 

+1 


267 
@30007 , 80177776 
ay 

ol 


271 

030011 ,80177776 
S$ 

+1 


272 
#30012 ,80177776 


273 

@30013 80177776 
7$ 

o1 


274 
030014 , 80177776 
8s 

+1 


275 
030015 ,80177776 


276 
030016 , 80177776 
_ 


Ww PSW 
s_ TEST SEC SEV SEZ 
PSW CORRECT? 


PSW 
s TEST SEN SEC SEZ 
PSW CORRECT? 


UP PS 
s TEST SEN SEV SEZ 
sPSu = 9h 


SEQ 0094 


5039 020742 
5040 


TE113A: 
& 


E8 
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TEST SIGNED AND CONDITIONAL BRANCHES 


BY 


sCLEAR ALL CC BITS IN PSW 
36GE SHOULD BRANCH 
:CPU ERROR 
sERROR; DIDN'T BRANCH 
s38GT SHOULD BRANCH 
; 


sERROR; OIDON’T BRANCH 
s8LE SHOULON’T BRANCH 
SBRANCH TO NEXT TEST 

:CPU ERROR 

sERROR; BLE SHOULD NOT HAVE BRANCHED 
s8LT SHOULD NOT BRANCH 
sQBRANCH TO NEXT TEST 


3;CPU ERROR 

sERROR; BLT SHOULD NOT HAVE BRANCHED 
sSET THE Z BIT IN PSW 
3 SHOULD BRANCH 


s8GT SHOULD NOT BRANCH 
sBRANCH TO NEXT TEST 


sCPU ERROR 

sERROR; BGT SHOULD NOT HAVE BRANCHED 
sCLEAR ALL CC BITS IN PSW 
3SET N BIT IN PSW 
sSHOULD BRANCH TO NEXT TEST 


CPU ERROR 
sERROR; BLT SHOULD HAVE BRANCHED 
sSHOULD BRANCH TO NEXT TEST 


:CPU ERROR 

sERROR; BLE SHOULD HAVE BRANCHED 
36GE O NOT BRANCH 
sGRANCH TO NEXT TEST 


:CPU ERROR 

sERROR; BGE SHOULD NOT HAVE BRANCHED 
s6GT SHOULD NOT BRANCH 
sQRANCH TO NEXT TEST 


sCPU ERROR 

sERROR; BGT SHOULD NOT HAVE BRANCHED 
sCLEAR ALL CC SITS 
sSET V BIT IN PSW 
sBLE SHOULD BRANCH 


3CPU ERROR 
sERROR,; BLE DIDN'T BRANCH 
:8LT SHOULD BRANCH 
:;CPU ERROR 
s;ERROR; BLT DIDN'T BRANCH 
:8GE SHOULDN'T BRANCH 
1 BRANCH TO NEXT TEST 
sERROR; BGE SHOULD NOT Be Baga 


36GT SHOULD NOT BR 
sBRANCH TO NEXT TEST 


:CPU ERROR 
sERROR; BGT SHOULD NOT HAVE BRANCHED 


SEQ 0095 
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SEQ 0096 
eeececeeeees DOUBLE OPERAND TESTS seeceesseseseceos 
5041 020744 000257 21%: ccc sCLEAR ALL CC BITS 
5042 020746 000272 -WORD 272 sSET N AND V BITS IN PSW 
5043 020750 002001 BGE 22% 18GE SHOULD BRANCH 
5044 020752 104001 ERROR +1 sCPU ERROR 
sERROR; BGE DIDN'T BRANCH 
5046 020754 0035001 22%: BGT 23% s6GT SHOULD BRANCH 
5047 020756 104001 ERROR +1 : 
sERROR; BGT DION’ T BRANCH 
5049 020760 003401 23% BLE 243 s6LE SHOULDN'T BRANCH 
5050 020762 000401 BR 25% sBRANCH TO NEXT TEST 
5051 020764 104001 24%: ERROR 1 :CPU ERROR 
c sERROR; BLE SHOULD NOT HAVE BRANCHED 
020766 002401 25% BLT 26% s6LT SHOULD NOT BRANCH 
5054 020770 000401 BR 27% sBRANCH TO NEXT TEST 
5055 020772 104001 26% ERROR +1 sCPU ERROR 
sERROR; BLT SHOULD NOT HAVE BRANCHED 
5057 020774 278: 
5060 020774 TE114: 
1 : TEST NOP INST 
5062 020774 012737 030000 177776 MOV #30000 , 80177776 sINIT PSW 
$063 021002 012700 000001 MOV #1, sINIT RO 
021006 012701 000002 MOV #2,R1 sINIT R1 
$065 021012 012702 0000035 MOV 3, sINIT R2 
5066 021016 012703 000004 MOV oR sINIT R3 
$067 021022 012704 000005 MOV @5,R4 sINIT R4 
021 012705 000006 MOV ° sINIT RS 
$069 021032 010637 003012 MOV ocoo sSAVE SP 
5070 021036 012737 030017 111462 MOV 030017 , B@EXPDAT sSETUP PSW 
5071 021044 000277 scc sSET ALL CONDITION CODE BITS 
S072 021046 000240 NOP 3; TEST INSTRUCTION 
5073 021050 000240 NOP s TEST INSTRUCTION 
5074 021052 000240 hae s TEST INSTRUCTION 
S075 021054 004767 JSR PC,7114 3 CKE: ° GPR'S 
5076 021060 020637 003012 CMP R6, 3 CHECK 
5077 021064 001401 BEQ 1% :0K GO ON 
5078 021066 104001 ERROR +1 
:NO GO TO ERROR 
5060 021070 012737 030000 111462 1%: MOV #30000 , B@E XPDAT sSETUP PSW 
5061 021076 000257 ccc sCLEAR ALL CONDITION CODE BITS 
S062 021100 000260 -WORD 260 s TEST FOR NOP CPERATION 
5063 021102 000260 -WORD 260 s TEST FOR NOP OPERATION 
5064 021104 000260 -WORD 260 s TEST FOR NOP OPERATION 
5065 021106 004767 000014 JSR PC.1T114 sCHECK PSW, AND GPR'S 
5066 021112 020637 003012 CMP R6 , B@SLOCOO sCHECK SP 
5067 021116 001401 BEQ 2s 30K GO ON 
021 104001 ERROR +1 sCPU ERROR 
Soa sNO GO TO ERROR 
$090 021122 2s: 
5091 021122 000167 000104 JP F INNOP 
$ 
5093 021126 023737 111462 177776 1114: CHP @SEXPDAT , 80177776 sCHECK PSW 
5094 021134 001405 BEQ TA114 :0K GO ON 
5095 021136 010067 157236 MOV RO, 400 sSAVE RO 
5096 021142 104001 ERROR +1 CPU E 
5097 sNO GO TO ERROR 
5096 021144 016700 157230 MOV 400 ,RO sRESTORE RO 
5099 021150 022700 1 TAL14; CMP #1,R0 sCHECK RO 


G8 
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$100 021154 
5101 021156 
5102 

5103 021160 
5104 021164 
$5105 021166 


5106 
5107 021170 


5114 
5115 021210 
$116 021214 
$5117 021216 
5116 


5144 

5145 021270 
5146 021274 
5147 021276 
5148 021300 


51 326 
5157 021330 


001401 
104001 


022701 
001401 
104001 


022702 
001401 
104001 


022703 
001401 
104001 


022704 
001401 
104001 
022705 
001401 
104001 
000207 


000240 


177777 


156520 
156512 


156462 
156454 


78114; 


TC114: 


70114: 


TF114; 


T6114: 


78114 
+1 


@2,R1 
1C114 
o1 


#3,R2 
10114 
+1 


04 ,R3 
TF114 
+1 


€5,R4 
T6114 
+1 


6 ,RS 
TH114 
+1 


STEST ATERNATE REGISTER SET 


1%: 


2s: 


CLR 
CLR 
CLR 
CLR 


CLR 


RO 
Ri 
Re 
R3 
R4 
RS 


#4000 ,PS 
#61T11,PS 
1s 

ol 


@177777,RO0 
RO 


RS 
#61711, PS 
@81T11.PS 
2s 
+1 


RO 
3% 
+1 


i 

sSELECT ALTERNATE REGISTER SET 
sTEST TO SEE THAT BIT IS SET IN PS 
sIF IT'S SET GO TESTS REGISTERS 


sCPU ERROR 
TERROR ! ALTERNATE eyes SELECT 


s8IT IN PS I 

sWRITE ALL ONES TO ALTERNATE REG SET 
: 

’ 

; 

; 


; 
sCLEAR BIT 11 IN PS 


sCPU ERROR 
sERROR! BIT 11 DIO NOT CLEAR 
sMAKE SURE THAT WE REALLY 
| WERE TALKING TO ALTERNATE REGISTERS. 
sCPU ERROR 


SEQ 0097 
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5159 sERROR! 
5160 021334 005701 3: TST R1 , 
5161 021336 001401 BEQsS 
5162 021340 104001 ERROR +1 CPU ERROR 
5163 sERROR! 
5164 021342 005702 4s: TST R2 P 
5165 021344 001401 BeEQStséSS ; 
5166 021346 104001 ERROR +1 :CPU ERROR 
5167 ; sERROR! 
5168 021350 005703 S$: TST R3 : 
5169 021352 001401 BEQ ss ’ 
5170 021354 104001 ol sCPU ERROR 
o 
5172 021356 005704 64: TST Ra , 
5173 021360 001401 BEQ 7$ ; 
3174 021362 104001 ERROR +1 CPU ERROR 
a 
5176 021364 005705 7%: TST . 
5177 021366 001401 BEQ Ss : 
5178 021370 104001 ERROR +1 :CPU ERROR 
5179 sERROR! 
5180 021372 012767 004000 156376 8%: MOV @81T11.PS sENABLE ALTERNATE REGISTER SET 
5181 021400 005000 CLR = RO b----- CLEAR----- 
5182 021402 005001 cLR sR + ---ALTERNATE - - - 
5183 021404 CLR sé :----REGISTER- -- 
5184 021406 005003 CLR sR possee- $81----- 
5185 021410 005004 CLR RA ; 
5186 021412 005005 CLR sR : 
5187 021414 042767 004000 156354 BIC @B1T11.PS BACK TO PRIMARY GPRS 
5188 021422 012700 177777 MOV €177777,RO ENSURE THAT WRITES TO PRIMARY GPRS 
5189 021426 010001 MOV —s- RO, R1 ;D0 NOT EFFECT ALTERNATE GPRS 
5190 021430 010102 MOV —s-R1. R2 : 
5191 021432 010203 MOV =—s-R2. RS : 
5192 021434 010304 MOV sR. RA : 
5193 021436 010405 MOVs R4RS : 
5194 021440 052767 004000 156330 BIS @81T11,PS RETURN TO ALTERNATE REGISTERS 
5195 021446 005700 TST RO ;SHOULD BE ALL 0'S 
5196 021450 001401 BEQ sé : 
S197 021452 104001 ERROR +1 :CPU ERROR 
5198 sERROR! 
5199 021454 005701 98: TST Ri : 
5200 021456 001401 BEQ 108 ; 
5201 021460 104001 ERROR +1 :CPU ERROR 
S202 i] 
5203 021462 005702 10$: ‘TST R2 , 
5204 021464 001401 BEQ 118 ; 
5205 021466 104001 ERROR +1 CPU ERROR 
5206 3 
5207 021470 005703 118: ‘TST R3 i 
5208 021472 001401 BEQ 128 ; 
5209 021474 104001 ERROR +1 sCPU ERROR 
3 
5211 021476 005704 12%: ‘TST Ra : 
5212 021500 001401 BEQ 138 i 
5213 021502 104001 ERROR +1 CPU ERROR 
; 


1 
5215 021504 005705 13%: TST "RS : 
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5216 021506 
$217 021510 
$218 021512 


$219 
S220 021512 
S221 


177777 
177777 


177777 
177777 


177777 
177777 


14%: 
ALROTS: 
8 


1%: 
2s: 


3%: 


2s: 


3%: 


14% 
+1 


sCPU ERROR 


ALTERNATE REGISTER SET RO BIT TESTS 


38 


BEQ 
ERROR 
CLR 
BEQ 
ERROR 


ALTERNATE REGISTER 


BEQ 

ERROR 
CLR 
CMP 
BEQ 


ALTERNATE REGISTER 
MOV 


CMP 
BEQ 


#177777 ,RO 
RO,@177777 


@177777,R1 
R1,0177777 


o1 


#177777 ,R2 
naewnee 


sR0*177777 
sD0ES RO*177777 
sYES ON 


SET R1 BIT TESTS 


3R1°177777 
sD0ES R1=*177777 
3sYES ON 


ERROR 
sNO GO TO ERROR 
R1=*S2525 


’ 
sD0ES R1*52525 
sYES GO ON 


sCPU ERROR 


sNO GO TO ERROR 


SET R2 BIT TESTS 

3R2°177777 
sD0ES R2*177777 
sYES GO ON 
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eeeeeeeeesee DOUBLE OPERAND TESTS eeesesesesesecesse 


$277 021660 
5278 


5313 021764 
314 


1 
5315 021766 
35316 021772 
5317 021776 
5318 022000 





125252 
125252 


177777 
177777 


177777 
177777 


125252 
125252 


1%: 


2s: 


4%: 


3 
ALR3TS: 
3 


ALR4TS: 
5 


1%: 


2s: 


ERROR ol 

CLR Re 

CMP R2,00 

BEQ 2s 

ERROR ol 

MOV #125252 ,R2 
CMP R2,¢ 

BEQ 3% 

ERROR ol 

MOV #52525 ,R2 
CMP Re, 

BEQ 4$ 

ERROR re 
ALTERNATE REGISTER 
MOV #177777 ,R3 
CMP R3,0177777 
BEG i$ 

ERROR ol 

CLR RS 

CMP R3,00 

BEQ 2s 

ERROR 1 

MOV #125252 ,.R3 
CMP R3, 0125252 
BEQ 3$ 

ERROR ol 

MOV #52525 .R3 
CMP R3,052525 
BEQ A$ 

ERROR ol 
ALTERNATE eS 
MOV 0177777,R4 
CMP R4, 0177777 
BEQ 1$ 

ERRuR ol 

CLR R4 

CMP R4,00 

BEQ 2s 

ERROR +1 

MOV #125252 ,R4 
CMP R4, 0125252 


SET R3 BIT TESTS 


3R3*177777 
sD0ES R3*177777 
sYES GO ON 


s;CPU ERROR 


Neo GO TO ERROR 


+ OOES R320 
;YES GO ON 


;CPU ERROR 


Nee GO TO ERROR 


:D0ES R3=125252 
;YES GO ON 


— GO TO ERROR 
3 Ss 

sD0ES R3=52525 
sYES GO ON 


sNO GO TO ERROR 


SET R4 BIT TESTS 


3R42177777 
sDOES R4=177777 
;YES GO ON 


sD0ES R4=125252 
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KB 


SEG 010 
eeeeeeeeeees DOUBLE OPERAND TESTS seecesssesececese 101 
5338 022040 001401 BEQ 3$ sYES GO ON 
5339 022042 104001 ERROR +1 CPU E 
sNO GO TO ERROR 
5341 022044 012704 052525 3% MOV #52525 ,R4 3R4252525 
5342 022050 020427 052525 CMP R4, sD0ES R4*52525 
5343 022054 001401 BEQ 4$ sYES GO ON 
5344 022056 104001 ERROR e1 :CPu E 
5345 sNO GO TO ERROR 
5346 022060 4%: 
5347 3 
5350 022060 ALRSTS: 
5351 3 ALTERNATE ott te SET RS BIT TESTS 
5352 022060 012705 177777 MOV 177777 ,R5 3R5*177777 
5353 022064 177777 CMP RS, 0177777 sD0ES R5*177777 
022070 001401 BEQ i$ YES ON 
5355 022072 104001 ERROR ol 3;CPU 
5356 sNO GO TO ERROR 
5357 022074 C05005 1%: CLR RS 3R5=0 
5358 022076 7 000000 CMP RS, 00 sD0ES RS=0 
5359 022102 001401 BEQ es sYES GO ON 
5360 022104 104001 o1 3 
5361 3NO GO TO ERROR 
5362 022106 012705 125252 2s: MOV #125252 ,,.R5 sR5= 
0221 125252 CMP RS, 7125252 sD0ES R5S=125252 
5364 022116 001401 BEQ 3% sYES GO ON 
5365 022120 1046001 ERROR ol 3 
3NO GO TO ERROR 
5367 022122 012705 052525 3%: MOV #52525 .R5 3sR5=52525 
5368 022 052525 CMP RS, 3;D0ES R5=52525 
5369 022132 001401 BEQ 4$ sYES GO ON 
5370 022134 104001 ERROR +1 ;CPU E 
:NO GO TO ERROR 
od | 022136 042767 004000 155632 4%: BIC #8IT11,PS ;RETURN TO PRIMARY GEN PURPOSE REGS 
5374 3 
5377 022144 TE115: 
3 TEST ong * FROM PROCCESSOR STATUS INST (MFPS) 
5379 022144 005004 CLR sSETUP DESTINATION R4 
5361 022146 012701 022354 MOV @TE115A,R1 sSETUP POINTERS TO TABLES 
5362 022152 012702 022364 MOV #TE1158 Re 3 
5383 022156 012703 022372 MOV @TE115C ,.RS 3 
5384 022162 012137 177776 1%: MOV (R1)+, 90177776 sSETUP PSW 
022 106704 MFPS R4 s TEST INSTRUCTION 
5386 022170 023722 177776 CMP 90177776,(R2)>+ sCHECK PSW 
5387 022174 001401 BEQ 2s 30K GO CN 
5388 022176 104001 ERROR +1 
$389 :NO GO TO ERROR 
5390 022200 020423 2s: CMP R4,CR3B)+ sCHECK R4 
5391 022202 001401 BEQ 3$% 30K GO ON 
5392 022204 104001 ERROE ol 3CPU ERROR 
5393 :NO GO TO ERROR 
5394 021127 177777 3%: CMP (R1),0177777 sARE WE DONE 
5395 022212 001363 BNE i$ :NO GO TO 1$ 
339 
5398 022214 012701 022354 MOV @TE115A,R1 ;SETUP POINTERS TO TABLES 


TK th tet hth nt MOEN ss He Ph he Ls 


eeeeeeeeeees DOUBLE OPERAND TESTS eesecesccsenseese 


022364 
022372 


177776 
177776 


322336 


022400 
111462 
111462 
177776 
177776 
111463 


111462 


177777 


000032 


1018: 


102%: 


103%: 


4$: 


5$: 


6%: 


7%: 


a 353 tte g 


*HUSSREEEISNS 


#TE1156,R2 
@TE115C,R3 


R6,RS 
(R1),@0177776 
@0177776,(R2) 
102% 


@TE115A,R1 

@TE1158 ,R2 

@TE1150,R3 

S0EXPDAT 
@EXPDAT ,.R4 

an , 06177776 

— C(R2)+ 

o1 

R4, GEXPDAT +1 

6% 

+1 

SPE XPDAT ,(R3)>+ 

7$ 

o1 

(R1),0177777 

4$ 


TE11SF 


L8 
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SE@ 0102 


F 

+ SAVE ry IN RS 

sSETUP P 

3 TEST INSTRUCTION 
CK PSW 


sCPU ERROR 
3NO GO TO ERROR 
sRESTORE STACK 


sSETUP POINTERS TO TABLES 
: 


VINIT EXPECTED DATA HOLDER. 
sSETUP POINTER TO TEST LOCATION 
sSETUP PSW 
3; TEST INSTRUCTION 
5 CK PSwW 
30K GO ON 
;CPU ERROR 
sNO GO TO ERROR 
sCHECK R4 
30K GO ON 
;CPU ERROR 
sNO GO TO ERROR 
3CHECK TEST LOCATION 
GO ON 


3NO GO TO 4$ 


M8 
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S458 022410 TE116: 
5459 ; TEST MOVE TO PROCESSOR STATUS INST (MTPS) 
S460 
$461 022410 012737 030000 177776 MOV #30000 , 80177776 sSET PSW TO KERNEL MODE 
$462 022416 012701 022712 MOV #TE1160,R1 sSETUP POINTERS TO TABLES 
5463 022422 012702 022670 MOV @TE1168 ,R2 : 
010103 MOV R1,R3 : 
S465 022430 004767 000136 JSR PC,.7116 ; TEST INSTRUCTION AND CHECK PSwW 
: SOURCE OPERAND 


5468 
5469 022434 012737 140000 177776 #140000 , 80177776 4-they- TO USER MODE 
; 


MOV 
Sa 000600 MOV #600 .R6 USER STACK 
5471 022446 012701 022712 MOV @TE1160,R1 sSETUP POINTERS TO TASLES 
012702 MOV @TE116C ,R2 : 
MOV R3 
JSR 


5473 022456 0101035 Ri, ; 
5474 022460 004767 000106 PC.7116 ; TEST INSTRUCTION AND CHECK PSW 
54 sAND SOURCE OPERAND 
on 
5478 022464 012737 140000 177776 MOV #140000 , 80177776 sSET PSW TO USER MODE AND CLEAR CC BITS 
$479 022472 012701 MOV @TE116A,R1 sSETUP POINTERS TO TABLES 
5480 022476 0 022702 MOV @TE116C ,R2 ; 
5481 022502 012703 022712 MOV @TE1160,R3 ; 
010104 MOV R1,R4 sSAVE A COPY OF R1 INTO R4 
5483 022510 004767 000110 JSR PC, TA116 ; TEST INSTRUCTION AND CHECK PSW 
S484 sAND SOURCE OPERAND 
3486 
5487 022514 012737 030000 177776 MOV #30000 , 80177776 3SET PSW TO KERNEL MODE 
5488 022522 012701 022664 MOV @TE116A,R1 ;SETUP POINTERS TO TABLES 
012702 022670 MOV #TE1168 ,R2 ; 
5490 022532 012703 022712 MOV #TE1160,R3 ; 
5491 022536 010104 MOV R1,R4 sSAVE A COPY OF R1 INTO R4 
5492 022540 000060 JSR PC, TA116 ; TEST INSTRUCTION AND CHECK PSW 
ey sAND SOURCE OPERAND 
5495 022544 005037 177776 CLR 90177776 SET PSW TO KERNEL MODE 
5496 022550 106427 177412 MTPS #177412 sTEST INSTRUCTION 
5497 022554 022737 000012 177776 CMP @12,80177776 sIS PSW CORRECT 
5496 022562 001401 BEQ 100% ;YES GO ON 
5499 022564 104001 ERROR +1 CPU ERROR 
5500 . 3NO GO TO ERROR 
5501 022566 100$: 
mos 022566 000167 000150 JP FIN116 
° 
5504 022572 012105 T116: MOV (R1)+,RS sMOVE TEST DATA TO RS 
5505 022574 106405 MTPS RS ; TEST INSTRUCTION 
5506 022576 023722 177776 CMP 80177776,(R2)+ sIS PSW CORRECT 
5507 022602 001401 BEQ 1% YES GO ON 
5506 022604 104001 ERROR +1 ERROR 
5509 3NO GO TO ERROR 
5510 022606 022305 18: CMP CR3)+,RS sIS RS CORRECT 
5511 022610 001401 BEQ 2s sYES GO ON 
5512 022612 104001 ERROR +1 sCPU ERROR 


5513 ;NO GO TO ERROR 
5514 022614 022227 177777 2s; CMP (R2),0177777 sARE WE DONE 


N8& 
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SEQ 0104 


5515 022620 001364 BNE T7116 sNO GO TO T116 
5516 022622 000207 RTS PC ;RETURN 
5517 3 
5516 022624 106421 TAL16: MTPS (R1)-+ ; TEST INSTRUCTION 
5519 022626 023722 177776 CMP 90177776,(R2)>+ sIS PSW CORRECT 
022632 001401 BEQ 1% ;YES GO ON 
5521 022634 104001 ERROR 1 ;CPU ERROR 
5522 :NO GO TO ERROR 
5523 022636 122423 18: CMPB (R4)+, CR3)> sCHECK TEST LOCATION 
022640 0014°1 BEG 2s :0K GO ON 
5525 022642 104001 ERROR +1 ;CPU ERROR 
sNO GO TO ERROR 
5527 022644 020104 2s: CMP R1,R4 sIS SOURCE OPERAND CORRECT 
022646 001401 BEQ 3$ ;YES GO ON 
5529 022650 104001 +1 ;CPU ERROR 
:NO GO TO ERROR 
5531 022652 005205 3%: INC A) sPOINT TO NEXT WORD 
5532 022654 021227 177777 CMP (R2),0177777 sARE WE DONE 
022660 001361 BNE TA116 sNO GO TO TA116 
022662 000207 RTS ;RETURN 
3 
022664 377 TE116A: .BYTE 377 
5537 022665 000 -BYTE 0O 
5538 022666 252 -BYTE 252 
5539 022667 125 -BYTE 125 
5540 022670 030357 TE1168: .WORD 30357 
5541 022672 030000 -WORD 30000 
5542 022674 030252 -WORD 30252 
5543 022676 030105 . WORD 105 
022700 177777 . WORD 177777 
5545 022702 140017 TE116C: .WORD 140017 
5546 022704 1 .WORD 140000 
5547 022706 140012 -WORD 140012 
5548 022710 140005 -WORD 140005 
5549 022712 177777 TE1160: .WORD 177777 
5550 022714 177400 -WORD 177400 
5551 022716 177652 -WORD 177652 
5552 022720 17 -WORD 17 
5553 ; 
5554 022722 FIN).16: 
3 
5565 022722 TE117: 
; TEST MFPT (MOVE FROM PROCESSOR TYPE) 
5567 022722 013746 000010 MOV 9010, -(SP) sSAVE VECTOR 
5568 022726 012737 023034 000010 MOV #TE117A,8010 ;SETUP VECTOR TO HANDLE POSSIBLE ILLEGAL INST TRAP 
0227 012700 17777 MOV #177777 ,R9O ;INIT RO 
5570 022740 012737 177776 MOV #30000 , 80177776 ;SETUP PSW 
5571 022746 -WORD 7 ; TEST INSTRUCTION 
5572 022750 022737 030000 177776 CMP #30000 , 80177776 :IS PSW CORRECT 
5573 022756 001401 BEQ 1% :YES GO ON 
5574 022760 104001 E +1 F E 
;NO GO TO ERROR 
5576 022762 7 000005 1%: CMP RO, 05 sIS RO CORRECT 
5577 022766 001401 BEQ 2s 3 ON 
55786 022770 104001 ERROR +1 ’ 
5579 ;NO GO TO ERROR 
5580 022772 012700 177777 2s: MOV @177777,R0 ;INIT RO 





Bo 
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eeececeseeee DOUBLE OPERAND TESTS esccccesesesesess SEQ 0105 


$$81 022776 000277 scc sSET MAL CC BITS 
$S82 023000 .WORD 7 s TEST INSTRUCTION 
02 022737 030017 177776 Chp 030017 ,80177776 sIS PSwW CORRECT 
$$84 023010 001401 BEQ 3$ sYES GO ON 
$565 023012 104001 ERROR ol 3;CPU ERROR 
3sNO GO TO ERROR 
$387 023014 020027 000005 3%; CMP RO, 05 sIS RO CORRECT 
$888 023020 001401 BEQ 4s sYES GO ON 
$5869 023022 104001 ERROR o1 s 
sNO GO TO ERROR 
$591 023024 012637 000010 4s: MOV (SP )+, 8010 sRESTORE VECTOR 
5593 023030 000167 000002 JP FIN117 
3 
5595 023034 104001 TE117A: ERROR +1 sCPU ERROR 
a 3G0 TO ERROR IF TRAP TAKES PLACE 
3 
5596 023036 000240 FIN117: “OP 
5599 3 
5611 023040 TE120: 
3 TEST HALT (NOT KERNEL MODE) 
5613 023040 005037 177766 CLR 80177766 sINIT CPU REG 
5614 023044 005037 177776 CLR 80177776 INIT PSW-SET KERNEL MODE 
013746 000004 MOV @04 , -(SP) sSAVE VECTOR 
013746 000006 mov (SP) sSAVE VECTOR 
5617 023060 012737 023114 000004 MOV @TE120A , 804 3SET UP VECTOR TO HANDLE ILLEGAL HALT 
5618 023066 000006 CLR sSET UWP VECTOR TO COME BACK IN KERNEL MODE 
5619 023072 012767 140000 154676 MOV #140000 ,PS sSET IN USER MODE 
5620 023100 012706 000600 MOV oR6 sINITIALIZE THE USER STACK POINTER 
5621 023104 000000 HALT 3: TEST INSTRUCTION 
5622 023106 104001 PROCNT: ERROR +1 3sCPU ERROR 
5623 sIF MOTHING HAPPENED GO TO ERROR 
5624 023110 000167 000044 JP FIN120 3 
5626 ; 
3 
5627 023114 022737 030000 177776 TE120A: CrP @30000 , 8017777€ 3IS PSW CORRECT/PREVIOUS MODE = USER? 
5628 023122 001401 BEQ 18 sVES GO ON 
5629 023124 104001 ERROR +1 3CPu ERROR 
5630 3sNO GO TO ERROR 
5631 023126 022737 000200 177766 18: Cer 0200 , 80177766 s TEST CPU ERROR REGISTER 
S632 023134 001401 6Ea 2s 3sYES GO ON 
S633 023136 104001 ERROR ol sCPU ERROR 
5634 sNO GO TO ERROR 
5635 023140 022627 023106 2s: Cop (SP )+, @PROCNT s00ES STACK CONTAIN CORRECT PC 
023144 001401 REQ 36 3sYES GO ON 
5637 023146 104001 ERROR ol sCPU ERROR 
5638 sO GO TO ERROR 
5639 023150 022627 140000 38: CoP (SP )+ , #140000 300ES STACK CONTAIN CORRECT PSw 
5640 023154 001401 BEQ FIN120 sYES GO ON 
5641 023156 104001 ERROR ol sCPU ERROR 
5642 sNO GO TO ERROR 
5643 023160 012637 000006 FIN120: MOV (SP)+, 806 sRESTORE VECTOR 
oe 023164 012637 G00004 MOV (SP)o, sRESTORE VECTOR 
S6ae 3 
5649 023170 TE121: 
5650 F TEST RESET 


02 
5703 023410 
3704 023416 
5705 023424 
5706 023432 
5707 023440 


COKDACO KDU11-8 CLUSTER DIAG. 
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177772 
177772 


025000 
025252 


077000 
077314 


077000 
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177776 
177572 
172516 


177772 
177772 


177772 
177772 


177776 


172516 


177772 


000004 
000006 


177776 
177572 
172516 
177772 


18: 


Ci2iA: 


C1218: 


Ci2ic: 


18: 


2s: 


3%: 


ONE 
TST 
BEQ 


83838 8 388 


9 


PAGE 7-86 
SEQ 0106 
OAPTENV , SENV sARE WE IN APT MODE? 
i$ sIF NOT: DO THIS TEST 
PASS sFIRST PASS?? 
18 sIF YES, 00 IT 
FINI22 }ELSE SKIP yy Fi My a4 BECAUSE RESETS 
sSCREW UP THE APT MONITOR. 
030340 , 80177776 sSETUP PSw TO KERNEL 
#160000 , 80177572 sSETUP MRO 
077 ,@0172516 sSETUP PRS 
177772 sCLEAR PIRO 
@0177772,¢0 sIS PIRG CORRECT 
Ci2ia sYES GO ON 
ol 3sCPu 
sNO GO TO ERROR 
025000 , 80177772 sMOVE AN ALTERNATING PATTERN TO PIRG 
025252 ,80177772 sIS PIRG@ CORRECT 
< e sYES GO ON 
sNO GO TO ERROR 
#77000 ,@0177772 sSETUP PIRO 
077314 ,80177772 sIS PIRG@ CORRECT 
- 3sYES GO ON 
oF 
»NO GO TO 
sSET ML CC BITS 
3 TEST INSTRUCTION 
030357 ,80177776 sIS PSW CORRECT 
“ 3YES Oey 
sNO GO TO ory 
@eSRO,R1 sSAVE SRO 
0176,R1 ;STRIP OFF port ED BITS 1-6 FROM PRO 
@0,R1 3IS MARO CORRECT 
2s sYES GO ON 
ol :CPU ERROR 
sO GO TO ERROR 
@0 , 80172516 3IS MARS CORRECT 
3% 3sYES GO ON 
ol :CPU ERROR 
s™O GO TO ERROR 
@0,90177772 sIS PIRG@ CORRECT 
rs} sYES GO ON 
ol 3;CPU ERROR 
3s™O GO TO ERROR 
BO4 RO sSAVE LOC 4 IN R2 
806 ,RS sSAVE LOC 6 IN RS 
96%, B04 sSETUP VECTORS IN CASE AN ERROR CAUSES 
:A HALT TO OCCUR IN USER MODE 
0340 , 806 sTHIS SETS KERNEL MODE. AND PREVENTS pare 
i Ts TRASHING THE STACK IF A 
sUSER MODE HALT OCCURS 
#140340 , 80177776 sSETUP PSw TO USER MODE 
#160000 , 80177572 » SETUP 
077 ,@0172516 sSETUP PRS 
#77000 ,@0177772 sSETUWP PIRQ 


sSET AL CC BITS 


DI 
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eecesseceeee DOUBLE OPERAND TESTS seccceccscsooooos 


5708 023442 RESET s TEST INSTRUCTION 

709 023444 022737 140357 177776 CMP 140357 , 80177776 11S PSwW — 
$710 023452 001402 BEQ 5s sYES GO ON 
$711 023454 000000 HALT sUSER MODE HALT; WILL TRAP TO LOC 4 
S712 023456 104001 ERROR +1 3 CPU ERROR 
$713 sNO GO TO ERROR 
$714 023460 013701 177572 S$: MOV 90177572,R1 sSAVE MRO IN R1 
5715 023464 042701 000176 BIC #176,R1 SCLEAR BITS 1-6 FROM PRO 
$716 023470 022701 160000 chp #160000 ,R1 sIS MARO CORRECT 
$717 023474 001402 BEQ 6s 1YES GO ON 
5718 023476 000000 HALT sUSER MODE HALT; WILL TRAP TO LOC 4 
5719 023500 104001 ERROR +1 :CPU ERROR 
57 sNO GO TO ERROR 
$721 023502 9022737 000077 172516 6%: CMP 077 ,80172516 3IS MARS CORRECT 
5722 023510 001402 GEQ 7% sYES 
5723 023512 000000 HALT sUSER MODE HALT; WILL TRAP TO LOC 4 
5724 023514 104001 ERROR +1 :CPU ERROR 

sNO GO TO ERROR 
$726 023516 022737 077314 177772 78: 077314 ,80177772 sIS PIRQ@ CORRECT 
5727 023524 001403 BEQ 96 sYES GO ON 
5726 023526 000000 HALT . sUSER “ODE HALT; WILL TRAP TO LOC 4 
5729 023530 104001 ERROR +1 :CPU ERROR 
57 sNO GO TO ERROR 
5731 023532 000002 68: RTI sUSER MODE HALT OCCURRED; GO TO ERROR. 
5733 023534 005037 177772 9%: CLR 80177772 sCLEAR PIRG 
S734 023540 005037 177776 CLR 80177776 sCLEAR PSW 
5735 023544 010237 000004 MOV Re, 804 sRESTORE VECTORS TO PREVIOUS STATE 
02. 010337 000006 MOV R3, 806 ; 
tes 023554 FIN121: 
F 

5741 023554 TE122: 
3762 : TEST SPL (SET PRIORITY LEVEL) 
5744 023554 012 000010 MOV 06. RS sINIT COUNTER 
5745 023560 012701 024004 MOV #71228 .R1 sSETUP POINTER TO DATA 

746 02 012737 030000 177776 1%: MOV #30000 , 80177776 s INIT 
5747 023572 004767 000054 JSR PC, T122A 3s TEST INSTRUCTION 
5748 023576 022137 177776 Cop (R1)+, 00177776 sIS PSW CORRECT 
5749 023602 001401 BEQ 2s sYES GO ON 
5750 023604 104001 ERROR +1 CPU 
$751 sNO GO TO ERROR 
pd 023606 077512 2s: $08 RS,18 sREPEAT UNTIL ALL CASES ARE TESTED 
5754 
5755 023610 012705 000010 MOV 06. RS sINIT COUNTER 
5756 023614 012737 140000 177776 3%: MOV 140000 , 80177776 sSETUP PSw TO USER MODE 
5757 023622 012706 000600 MOV 600 , R6 sSETUP USER STACK 
5758 023626 004767 000020 JSR PC. T122A s TEST INSTRUCTION 
$759 023632 022737 140017 177776 CMP #140017 , 80177776 3IS PSW CORRECT 

760 02 001401 BEQ 4 sYES GO ON 
5761 023642 104001 ERROR +1 :;CPU ERROR 

sNO GO TO ERROR 

oar 023644 077515 4t: $08 RS ,38 sREPEAT UNTIL ALL CASES ARE TESTED 
5765 
5766 023646 000167 000152 JMP FIN122 


SEQ 0107 


sy, 
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SEQ 0108 
eeeeeeeseese DOUBLE OPERAND TESTS seccccesecososecs 
5767 q 
5768 023652 020527 000010 T122A: CMP R5, 06. sFIND OUT WHAT COUNTER IS 
5769 023656 001003 BNE 1% sIF NOT PRIORITY O GO TO 1$ | 
5770 023660 000277 scc sSET ALL CC BITS 
5771 023662 000230 SPL 0 sSET PRIORITY TO O 
S772 023664 BR 83 sRE TURN 
773 023666 7 000007 1% CMP RS, 07 sFIND OUT WHAT COUNTER IS 
5774 023672 001003 BNE 2s sIF NOT PRIORITY 1 GO TO 2% 
5775 023674 000277 scc sSET ALL CC BITS 
5776 023676 000231 SPL 1 sSET PRIORITY TO 1 
5777 023700 BR 63 sRE TURN 
$778 023702 7 000006 2s CMP RS, 06 sFIND OUT WHAT COUNTER IS 
5779 023706 001003 BNE 3% sIF NOT PRIORITY 2 GO TO 3% 
$780 023710 7 scc sSET AL CC BITS 
5761 023712 000232 SPL 2 sSET PRIORITY TO 2 
$762 023714 000432 BR 8s 3RETURN 
57863 023716 7 000005 3% CMP R565 iFIND OUT WHAT COUNTER IS 
5764 023722 001003 BNE 4s sIF NOT PRIORITY 3 GO TO 4% 
$785 023724 000277 scc 3SET MAL CC BITS 
5786 023726 000233 SPL 3 3sSET PRIORITY TO 3 
5787 023730 BR 83 sRETURN 
5768 023732 7 000004 43 CMP RS ,04 sFIND OUT WHAT COUNTER IS 
5789 023736 0010035 BNE 5% sIF NOT PRIORITY 4 GO TO S$ 
5790 023740 000277 scc 3SET AL CC BITS 
5791 023742 000234 SPL & 3SET PRIORITY TO 4 
5792 023744 000416 BR 83 sRE TURN 
5793 023746 000003 5% CMP RS, @3 3sFIND OUT WHAT COUNTER IS 
5794 023752 001003 BNE 68% sIF NOY PRIORITY S GO TO 6% 
5795 023754 000277 scc sSET AL CC BITS 
3756 000235 SPL 5 3SET PRIORITY 10 5 
5797 023760 000410 BR 83 3RE TURN 
5796 023762 7 000002 6% CepP R502 3sFIND OUT WHAT COUNTER IS 
5799 023766 001003 BNE 7% 3IF NOT PRIORITY 6 GO TO 7$ 
$800 023770 000277 scc 3SET AL CC BITS 
5801 023772 000236 SPL 6 3SET PRIORITY TO 6 
$802 023774 000402 BR 8s 3RE TURN 
5803 023776 000277 78: scc sSET ALL CC BITS 
5804 024000 000237 SPL 7 3SET PRIORITY TO 7 
58605 024002 000207 8s: RTS PC sRE TURN 
5806 3 
5807 0249004 030017 71228: .WORD 30017 
5606 024006 030057 -WORD 30057 
5609 024010 030117 -WORD 30117 
5610 024012 030157 -WORD 30157 
5611 024014 030217 -WORD 30217 
5612 024016 0 7 .WORD 30257 
024020 030317 -WORD 30317 
5814 024022 030357 -WORD 30357 
pce 024024 000240 FIN122: NOP 
é 
58619 024026 TE123: 
58620 3 TEST eat = me (MULTI matt Pen INST) 
5621 024026 005037 177776 CLR 
$622 024032 012703 000012 MOV + tg NT COUNT ER 
5823 024036 012701 000400 MOV 0400 ,R1 sSETUP DESTINATION 
$624 024042 012700 024210 MOV @T123A,RO0 T 


sSETUP SOURCE 
58625 024046 012021 100%: MOV (RO) ,CR1)+ ;RELOCATE TABLES 


030000 


177776 


177777 
024236 


000032 


000010 


177776 18: 


2s: 


3%: 


4$: 


5$: 


000010 


95358 353 gig Seeeee5ess 


@ 
a) 
wn 


5 3 35 Sh388 a53 


4-4 
3a 
“44 


FQ 
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R3,100% 
8010, -(SP) 
#71230 ,8010 


R1,R4 
#30000 , 80177776 


‘7221 
— .80177776 


+1 

RO,CR3) 

3% 

o1 

Ra 

R4 

R4,R1 

4s 

ol 

#1,(R3) 
CR3)+,-CR1) 
5% 

o1 

R1 

R1 

- aeatiis 
@T123€ ,8010 
7201 

+1 

T123F 


167604 
te) 


sARE WE DONE 

sSAVE VECTOR 

sSETUP NEW VECTOR 

sINIT RO 

sSETUP POINTERS TO TABLES 
3 

$ 


$ 

sSETUP PSW 

sSET V BIT 

s TEST INSTRUCTION 
sIS PSW CORRECT 
YES 


sCPU 

sNO GO TO ERROR 
sIS RO CORRECT 
3YES GO ON 


‘ 
sNO GO TO ERROR 
sSETUP EXPECTED DATA 
i 
sIS R1 CORRECT 
sYES GO ON 
$ 
sNO GO TO ERROR 
sSETUP EXPECTED DATA 


sIS TEST LOCATION CORRECT 
sYES GO ON 


$ 
sNO GO TO ERROR 
sPCINT TO NEXT TEST LOCATION 
sARE WE DONE 
sNO GO TO 1% 
sSETUP NEW VECTOR 


+ TEST INSTRUCTION ILLEGAL MODE 


3;CPU ERROR 
:GO TO ERROR IF DION'T TRAP 


3;CPU ERROR 

3GO TO ERROR IF TRAPPED 
;CLEAN UP STACK 
’ 
sRESTORE VECTOR 


SEQ 0109 
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177776 
000012 


000010 


177776 


177776 


177777 
024470 000010 


000032 


3 
TE124: 
‘ 


68: 


7%: 


8%: 


Ra 353 BSS Sh SABE RSSSSS SSSR SEES! 


a3 


G9 


PAGE 7-92 


R2, 
ae 


(R1), 
R3, 0416 
es 


3$ 
as 


CR1)> . -(R2) 
8s 

o1 

Re 

R2 
(R1),0177777 
1% 

@T124E ,8010 
7302 

+1 

T124F 


7322 
_ 80177776 


SE@ 0110 


COUNTER 

sSETUP DESTINATION 

sSETUP SOURCE 

}RELOCATE TABLES 
DONE 


3s ARE 

sSAVE VECTOR 

sSETUP NEW VECTOR 

sSETUP POINTERS TO TABLES 
$ 

a 


; 
sSETUP PSW 


sSETUP RO 

iTS THIS THE FIRST TEST CASE 
sYES GO TO 28 
sNO GO TO 3% 
iSET C BIT 


SCLEAR c a 


3 
3NO GO TO ERROR 
sSETUP EXPECTED DATA 
3 
sIS R2 CORRECT 
sYES GO ON 
3CPU ERROR 
sNO GO TO ERROR 
3IS TEST LOCATION CORRECT 
3YES GO ON 
3;CPU ERROR 
3NO GO TO ERROR 
sPOINT TO NEXT TEST LOCATION 
ry 
sARE WE DONE 
3sNO GO TO 1% 


sSETUP NEW VECTOR 
CPU ERROR s TEST INSTRUCTION ILLEGAL MODE 
: 


1sGO TO ERROR IF DION'T TRAP 


HY 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 16-OCT-84 16:58 PAGE 7-95 


SEQ O 
ecccceeeesse DOUBLE OPERAND TESTS eeecccesosesosses any 
$942 024450 177777 -WORD 177777 
5943 024452 177777 71248: .WORD 177777 
5944 024454 177777 «WORD 177777 
5945 024456 177777 «WORD 177777 
024460 030011 T124C: .WORD 30011 
5947 024462 030004 «WORD 30004 
5948 024464 030000 -WORD 30000 
5949 024466 104001 T1240: ERROR +1 :CPU ERROR 
3GO TO ERROR IF TRAPPED 
5951 024470 005726 T124E: TST (SP )- sCLEAN UP STACK 
5952 024472 005726 TST (SP )+ 8 
ae 024474 012637 000010 T124F: MOV (SP)+,@010 sRESTORE VECTOR 
5 
5958 024500 TE125: 
5959 3 TEST MA CMULTIPLY INST) 
5960 024500 005037 177776 CLR 90177776 sINIT PS 
ey! 024504 012701 024740 MOV @TE125A,R1 sSETUP POINTERS TO TABLES 
5963 024510 0101357 111462 18: MOV R1 , BCEXPDAT ; 
5964 024514 062737 000002 111462 ADD @2 , B@EXPDAT sPOINT TO SOURCE 
024522 012703 122222 OV #122222 ,R3 sINIT RS TO A KNOWN STATE 
5966 024526 011102 MOV (R1),R2 sINIT DESTINATION REG 
5967 024530 000277 scc sSET AL CC BITS 
5968 024532 070261 000002 MUL 2(R1),R2 s TEST INSTRUCTION 
5969 024536 026137 000004 177776 CMP 4(R1), 80177776 sIS PS CORRECT 
5970 024544 001401 BEQ 2s sYES GO ON 
5971 024546 104001 ERROR 1 
72 sNO GO TO ERROR 
5973 029550 026103 000006 2s: CMP 6(R1),R3S sIS R3 CORRECT 
5974 024554 001401 BEQ 3% sYES GO ON 
S975 024556 104001 ERROR 1 sCPU ERROR 
5976 sNO GO TO ERROR 
5977 024560 026102 000010 38: CMP 10(R1),R2 sIS R2 CORRECT 
5978 024564 001401 BEQ ay sYES GO ON 
5979 024566 104001 ERROR +1 sCPU ERROR 
3sNO GO TO ERROR 
5961 024570 026177 000002 064664 4%: CrP 2(R1), SEXPDAT sIS SOURCE LOCATION OK 
5962 024576 001401 BEQ S$ sYES GO ON 
5963 024600 104001 ERROR 1 sCPU ERROR 
sNO GO TO ERROR 
5985 024602 062701 000012 5%: ADO #12,R1 3GO TO NEXT TEST 
6 024606 020127 025166 CMP R1,@F IN125 sARE WE FINISHED 
5967 024612 001336 BNE 1s sNO GO TO 1% 
5968 
5969 ; 
5990 sSECOND PART 
ste sUSING O0C REGISTER 
3 
5993 024614 012701 024740 6%: MOV @TE125A,R1 ;SETUP POINTERS TO TABLES 
5994 024620 78; 
5995 024620 010102 MOV R1,R2 3 
024622 012706 001000 MOV @STBOT ,R6 sINIT R6 TO A KNOWN STATE 
5997 024626 012704 000004 MOV 04 ,R4 sSETUP R4 VALUE 
5996 024632 011105 MOV (R1),R5 sINIT DESTINATION REG 
5999 024634 7 scc sSET ALL CC BITS 
6000 024636 070561 000002 MUL 2(R1),R5 3s TEST INSTRUCTION 


eeeeeaeeceee DOUBLE OPERAND TESTS seeceescceseseces 


6001 024642 026137 000004 177776 CMP 
6002 024650 001401 BEQ 
6003 024652 104001 ERROR 
6005 024654 026105 000006 8s CMP 
024660 001401 BEQ 
6007 024662 104001 ERROR 
020627 001000 9%: CMP 
6010 024670 001403 BEQ 
6011 024672 012706 001000 MOV 
os 024676 104001 ERROR 
6014 024700 005722 108: TST 
6015 024702 021261 000002 CMP 
024 001401 BEQ 
6017 024710 104001 ERROR 
6019 024712 020427 000004 118: CoP 
6020 024716 001401 BEQ 
6021 024720 104001 ERROR 
6023 024722 062701 000012 12s ADD 
6024 024726 020127 025166 chp 
6025 024732 001352 BNE 
6028 024734 000167 000226 Jp 
H 
8 
6031 024740 177777 TE125A: .WORD 
6032 024742 177777 . WORD 
6033 024744 000000 . WORD 
6034 024746 000901 . WORD 
6035 024750 000000 . WORD 
6037 024752 006772 - WORD 
6038 024754 100000 . WORD 
6039 024756 000011 . WORD 
6040 024760 000000 . WORD 
6041 024762 174403 . WORD 
6043 024764 177777 - WORD 
6044 024766 077777 . WORD 
6045 024770 000010 - WORD 
6046 024772 100001 . WORD 
6047 024774 177777 . WORD 
6049 024776 077777 - WORD 
025000 000456 . WORD 
6051 025002 000001 . WORD 
025004 177322 . WORD 
6053 025006 000226 . WORD 
6055 025010 173210 . WORD 
025012 000000 . WORD 
6057 025014 000004 . WORD 


4(R1), 80177776 
8s 


ol 
6(R1),R5 
1) 

+1 

R6, @STBOT 
10% 

@STBOT ,R6 
ol 

(R2)+ 
(R2),2CR1) 
11% 

ol 


FIN125 


177777 
177777 


177777 
77777 
10 
100001 
177777 


77777 
456 


1 
177322 
226 
173210 
te) 

& 


§ Rae 
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SEQ 0112 


sIS PS CORRECT 
sYES GO ON 


3;CPU ERROR 

3NO GO TO ERROR 
F 
sARE WE FINISHED 
3sNO GO TO 7$ 


sMULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


JI 
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00000 
177777 
077777 
000001 


000000 
077777 
000000 


S5555 S5585 55588 55883 53888 38888 28888 85555 85555 83 


ooeco ome oo 
_ 


oe pe 
; : 


00000 
177777 
77777 
1 


2 
100000 
11 


0 
177777 


sMULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


:MULTIPLICAND 
sMULTIPLIER 


sMULTIPLICAND 
sMULTIPLIER 


SEQ 0113 


| 
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SEQ 0114 
eeeeeeseeeee DOUBLE OPERAND TESTS seeeseseessessese 
6115 025154 000001 -WORD 1 sMULTIPLICAND 
6116 025156 177777 «WORD 177777 sMULTIPLIER 
6117 025160 000010 -WORD 10 
6116 025162 177777 -WORD 177777 
6119 025164 177777 ° 177777 
6120 0251 FIN125: 
6121 3 
6124 025166 TE126: 
; TEST DIV (DIVIDE INST) 
6126 025166 005037 177776 CLR 90177776 sINIT PSW 
6127 025172 CLR R6 sINIT SP 
6126 025174 013705 000000 MOV 900 ,RS sSAVE VECTORS 
6129 013701 000002 MOV 902 ,R1 H 
6130 012737 000137 000000 MOV #137 ,900 sSETUP NEW VECTORS 
6131 02521 012737 025234 000002 MOV @TE126A, 802 j 
025220 000277 scc sSET ALL CC BITS 
6133 025222 071627 000002 OIv #2 ,R6 s TEST INSTRUCTION 
6134 025226 012706 001000 Al26: MOV @STBOT .R6 sRESTORE SP BEFORE GOING TO ERROR 
6135 025232 104001 ERROR +1 sCPU ERROR 
61 sIF R7 ISN'T CORRECT GO TO ERROR 
6137 025234 022737 000000 177776 TE126A: CMP @0,80177776 sIS PS CORRECT 
6138 025242 001405 BEQ 1$ sYES GO ON 
6139 025244 012706 001000 MOV @STBOT .R6 sRESTORE SP BEFORE GOING TO ERROR 
6140 025250 104001 ERROR +1 sCPU ERROR 
6141 3NO GO TO ERROR 
6142 025252 012704 025226 18: MOV A126 ,R4 sSETUP EXPECTED DATA 
6143 025256 ASR 
6144 025260 CMP R4,R6 sIS R6 CORRECT 
6145 025262 001403 BEQ 2s sYES GO ON 
025264 012706 001000 MOV @STBOT ,R6 sRESTORE SP BEFORE GOING TO ERROR 
6147 025270 104001 ERROR +1 3C’U ERROR 
61 :NO Go TO ERROR 
6149 025272 010537 000000 2s: MOV 800 sRESTORE VECTORS 
6159 025276 010137 000002 MOV R1, 802 i 
6151 025302 012 001000 MOV @STBOT .R6 sINIT SP 
6152 025306 012702 000006 MOV »R2 sINIT GPR 2 
6153 025312 012703 000047 MOV 047 ,R3 sINIT GPR 3 
6154 025316 000277 scc sSET AL CC BITS 
025 071302 OIV R2,R3 s TEST INSTRUCTION 
022737 000002 177776 CMP @2,80177776 sIS CORRECT 
6157 025330 001401 BEQ 3¢ sYES 
6156 025332 104001 ERROR 1 
sNO GO TO ERROR 
6160 025334 022702 - 000006 3%: CMP @6,R2 - sIS R2 CORRECT 
6161 025340 001401 BEQ as Q ON 
6162 025342 104001 ERROR +1 
6163 sNO GO TO ERROR 
6164 025344 022703 000047 4$: CMP 047,R3 sIS R3 CORRECT 
6165 025350 001401 BEQ S$ : ON 
6166 025352 104001 ERROR o1 
67 sNO GO TO ERROR 
6166 0253554 5%: CLR RA sINIT R4 
6169 025356 012705 000004 MOV 04,RS sINIT RS 
6170 025362 000277 scc sSET ALL CC BITS 
6171 025364 071427 000000 DIV #0 ,R4 + TEST INSTRUCTION 
6172 025370 022737 000007 177776 CMP #7 80177776 sIS PS CORRECT 
6173 025376 001401 BEQ 6% sYES GO ON 
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eeceseeeceee DOUBLE OPERAND TESTS seseesscosesseses 


104001 


012701 


010137 
011104 
016105 


000000 


000004 


000010 


177776 


177776 


6%: 


78: 


8s: 


108: 
BEQ 
ERROR 

11%: CMP 
BEQ 
ERROR 

12%: MOV 
CLR 
scc 
OIV 
CMP 
BEQ 
ERROR 

13%: CMP 
BEQ 
ERROR 

14%; CMP 
BEQ 
ERROR 

i 

3 

5 

15%: MOV 

168: MOV 
MOV 
MOV 


BEQ 
ERROR 
MOV 
9%: CMP 
BEQ 
ERROR 
CMP 


ol 
@0,R4 
7% 
ol 
04,25 
8$ 
+1 


04 ,RO 
#10,R5 
R4 


RO,R4 
#0 ,80177776 
9% 


#10,R5 
Ra 


@3,R4 

#0 ,80177776 
13% 

ol 

@2,,R4 

14% 

ol 

o2,R5 


15% 
ol 


@TE1268 ,R1 


R1, BCEXPDAT 
(R1),R4 
4(R1),R3 


$ 
sSET AL CC BITS 
s_ TEST INSTRUCTION 


5 T R4 

sSET AL CC BITS 

s TEST INSTRUCTION 
3IS PS CORRECT 
sYES GO ON 


SE@ 0115 


sSETUP POINTERS TO TABLES 


sSAVE A COPY OF RI 





177777 
177777 
177777 
000000 
000000 
000001 
000000 
177777 
177777 


000012 
177777 
000000 


177777 
000000 
177777 
000002 


000000 
177777 


000000 
007642 


000010 


000012 


177776 


178: 


188: 


19%: 


20%: 


21%: 


TE1268: 


CMP 
BQ 


G5 SBERED SRREE Bungay + AES FP FPS | 


2(R1),R5 sINIT RS 
sSET ALL CC BITS 
4(R1),R4 s TEST INSTRUCTION 
6(Rt}.00177776 sIS PS CORRECT 
sYES GO ON 

%y sCPu 

sNO GO TO ERROR 
10(R1),RS sIS RS CORRECT 
16% sYES GO ON 
+1 ;CPU ERROR 

sNO GO TO ERROR 
12(R1),R4 sIS R4 CORRECT 
19% ;YES GO ON 
+1 ;CPU ERROR 

3NO GO TO ERROR 
SEXPDAT ,R1 3IS R1 CORRECT 
20% sYES GO ON 
+1 ;CPU ERROR 

sNO GO TO ERROR 
@SEXPDAT ,R1 sRESTORE CORRECT VALUE 
4(R1),R3 sIS SOURCE CORRECT 
21% YES 
+1 ;CPU ERROR 

:NO GO TO ERROR 
R3,4(°1) TO RESTORE CODE 
#14,R1 sPOINT 10 yo LOCATION 
(R1), 0333 ;ARE WE DONE 
16% sNO GO TO 16$ 
FIN126 
177777 ;OIVIDEND 
177777 ;INIT RS 
177777 ;OIVISOR 
f¢) 3PSwW 
0 3sR5 RESULT 
1 3R4 RESULT 
0 OIVIDEND 
177777 TRS 
os sOIVISOR 
177777 ;RS RESULT 
0 3R4 RESULT 
177777 ;OIVIDEND 
0 sINIT RS 
177777 ;OIVISOR 
é 3PSW 
0 3R5 RESULT 
177777 ;R4 RESUT 
0 sDIVIDENO 
7642 sINIT RS 


M9 
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eceesesecese DOUBLE OPERAND TESTS seeceeseseseseses 


SEQ 0116 


— NO one antes tiie CE 
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eeceeeesesee DOUBLE OPERAND TESTS secccescosesesoses SEG 0117 


6268 025760 007645 -WORD 7645 sOIVISOR 
6289 025762 000004 . WORD 3PSw 
6290 025764 007642 -WORD 7642 sRS RESULT 
6291 025766 000000 . WORD :R4 RESULT 
6293 025770 . WORD sOIVIDEND 
6294 025772 000137 -WORD 137 sINIT RS 
6295 025774 177543 -WORD 177543 ;DIVISOR 
6296 025776 . WORD 3PSW 
6297 026000 000157 -WORD 137 sRS RESULT 
026002 . WORD sR4 RESULT 
026004 . WORD sOIVIDEND 
1 026006 007645 -WORD 7643 sINIT RS 
6302 026010 007645 -WORD 7643 sOIVISOR 
6303 026012 -WORD O PS 
6304 026014 000000 -WORD 0 sRS RESULT 
6305 926016 000001 -WORD 1 sR4 RESULT 
6307 026020 1 -WORD 100000 ;DIVIDEND 
026022 004376 -WORD 4376 s 
6309 026024 010021 -WORD 10021 ;DIVISOR 
6310 026026 . WORD sPSW 
6311 026030 004376 -WORD 4376 sRS RESULT 
ry 026032 1 -WORD 100000 ;R4 RESULT 
6314 026034 177700 -WORD 177700 ;DIVIDEND 
6315 026036 170035 -WORD 170033 ; INIT RS 
6316 026040 010021 -WORD 10021 ;DIVISOR 
6317 026042 000010 . WORD 3PSW 
631€ 026044 171307 -WORD 171307 ;RS RESUT 
€319 026046 176024 -WORD 176024 ;R4 RESULT 
6321 026050 177700 -WORD 177700 ;DIVIDEND 
026052 170033 -WORD 170033 ;INIT RS 
6323 026054 167757 -WORD 167757 ;OIVISOR 
026056 . WORD sPSW 
6325 026060 171307 -WORD 171507 ;RS RESUT 
ar 026062 001754 -WORD 1754 sR4 RESULT 
6328 . WORD sOIVIDEND 
6329 177777 -WORD 177777 ;INIT RS 
6330 026070 1 . WORD sOIVISOR 
6331 026072 . WORD sPSW 
6332 026074 177777 -WORD 177777 ;RS RESULT 
= 026076 . WORD sR4 RESULT 
6335 026100 177777 -WORD 177777 ;DIVIDEND 
6336 026102 045716 -WORD 45716 ;INIT RS 
6337 026104 000001 -WORD 1 sOIVISOR 
6338 026106 000012 -WORD 12 sPSwW 
6339 026110 045716 -WORD 45716 ;RS5S RESULT 
oy 026112 177777 -WORD 177777 ;R4 RESULT 
1 
6342 026114 000000 -WORD 0 sOIVIDEND 
6343 026116 000002 -WORD 2 sINIT RS 
0261 177779 -WORD 177770 ;DIVISOR 


B10 
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eecceesecese DOUBLE GRERAND TESTS eeccccecscsssocos SEO 0116 
6345 026122 000004 WORD 4 pPSid 
6346 026124 000002 WORD 2 3sRS RESULT 
6347 026126 000000 .WORD O 3R4 RESULT 
6348 
6349 026130 177777 .WORD 177777 s;OIVIOEND 
6350 0261382 177776 -WORD 177776 ;INIT RS 
6351 026134 000010 -WORD 10 sOIVISOR 
6352 026136 000004 WORD 4 3PSW 
6353 026140 177776 -WORD 177776 ;R5 RESULT 
6354 026142 000000 -WORD O 3R4 RESULT 
6356 026144 000001 -WORD 1 sOIVICEND 
6357 026146 177777 WORD 177777 ;INIT RS 
6356 026150 000001 -WORD 1 sOIVISOR 
6359 026152 000002 -WORD 2 3P' 
6360 026154 177777 .WORD 177777 ;R5S RESULT 
6361 026156 000001 -WORD 1 3R4 RESULT 
6363 026160 000001 -WORD 1 sMIVIDEND 
6364 026162 000000 -WORD O r T RS 
6365 026164 000002 -WORD 2 sOIVISOR 
6366 026166 000002 WORD 2 
6367 026170 000000 -WORD O 385 RESULT 
6368 026172 000061 -WORD 1 3R4 RESULT 
6370 026174 000001 -WORD 1 sOIVIDEND 
6371 026176 000000 -WORD O sINI: RS 
026200 000003 -WORD 35 sOIVISOR 
6373 026202 000000 -WORD O 
6374 026204 000001 WORD 1 3sR5 RESULT 
6375 026206 -WORD $2525 3R4 RESULT 
6377 026210 000023 -WORD 23 sOIVIDEND 
63786 026212 016054 -WORD 1 l T Rs 
6379 026214 016537 -WORD 16537 sOIVISOR 
6380 026216 . WORD 3PSw 
1 010222 -WORD 10222 385 RESULT 
oe . WORD 384 RESULT 
6384 026224 000333 .WORD 333 
6385 026226 FIN126: 
6386 : 
6389 026226 TE127: 
6390 3 TEST ASH (ARITHMETIC SHIFT) 
6391 026226 005037 177776 CLR 00177776 sINIT PSw 
012702 000001 “Ov 01,R2 sSETUP OPERAND 
6393 026236 000277 scc sSET ML CC BITS 
6394 026240 072202 ASH R2,R2 s TEST INSTRUCTION 
6395 026242 022737 O00000 177776 Cor @0 , 80177776 3IS PS CORRECT 
6396 026250 001401 BEG 18 sYES GO ON 
6397 026252 104001 ERROR ol sCPuU 
6398 :NWO GO TO ERROR 
6399 026254 020227 000002 is: CMP R2,02 sIS R2 CORRECT 
001401 BEQ es sYES GO ON 
6401 026262 104001 ERROR ol 
6402 :NO GO TO ERROR 


6403 026264 012702 100000 26: MOV #100000 ,R2 sSETUP R2 


012701 


016102 
000277 


177761 
077777 
000005 


177700 
017777 


000000 
017777 


COKDACO KDJ11-6 CLUSTER DIAG. 
ecccececeees DOUBLE OPERAND TESTS eeccccosesocsooos 


000001 


000007 


000010 
026666 


MACRO M1200 18-OCT-84 16:38 


177776 


4$: 


St: 
68: 


177776 


78: 


98: 


108: 


S555 GEG§ = R88 feed Ges pes poaunee 2 prs 


C10 


PAGE 7-101 


#1,R3 
R3,R2 

©7, 00177776 
36 

el 

R3,01 

as 

“1 

R2,00 

S$ 

“1 
@TE127A,R1 


R1,RS 
2(R1),R2 


(R1),R2 
- «alt ith 
$ 


el 
6(R1),R2 
&s 

ol 

R3,R1 

98 

ol 

R3,R1 
(RS), (RL) 
108 


@10,R1 
R1,@F IN127 
y) 


FIN127 


177761 
77777 
5 

0 


177700 
17777 


0 
17777 


sSETUP RS 

sCLEAR ALL CC BITS 
+ TEST INSTRUCTION 
sIS PS CORRECT 
sYES GO IN 


:CPU ERROR 
sNO GO TO ERROR 


:CPU ERROR 
sO GO TO ERROR 


sRESTORE Ri 
3IS <a CORRECT 


sCPU ERROR 

sNO GO TO ERROR 
sSOURCE LOOKS INCORRECT 
s INCREMENT POINTER 


sARE VE 
sNO GO TO 68 


SE@ 0119 


D10 
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eecceseceses DOUBLE OPERAND TESTS secesecsesococoos 


6461 026446 177700 
6462 026450 100000 
6463 026452 000010 
6464 026454 100000 


SEQ 0120 


177700 s SOURCE 
100000 sDEST 


6466 026456 177777 j 177777 1 SOURCE 
6467 026460 100000 : 100000 s0€ST 
026462 000010 ¥ 10 


140000 


177737 s SOURCE 
177777 sDEST 


11 

177777 

177706 s SOURCE 
oe sO€ST 

te) 

177710 


6469 026464 140000 


6470 
6471 026466 177737 
6472 026470 177777 


000011 
6474 026474 177777 


t 
~ 
~ 
: 


6480 
6481 026506 177710 
6462 026510 017777 
6483 026512 000015 
6484 026514 177400 
6485 


55 S555 S585 5558 S555 5588 955 S555 5585 5553 5555 5855 
: 


6486 026516 177715 . 177713 ’ 

6487 026520 000012 . 12 sDEST 
6488 026522 . 0 

oo 026524 050000 ° 

6491 026526 177707 ° 177707 s SOURCE 
6492 026530 170001 . 170001 sDEST 
6493 026532 . 2 

6494 026534 000200 . 200 

6496 026536 177717 ° 177717 s SOURCE 
6497 026540 1 . 1 sDEST 
6496 026542 000012 . 12 

6499 026544 100000 ° 100000 

6501 026546 177740 177740 H 

6502 026550 017777 . 17777 sDEST 
6503 026552 000004 ° a 

6504 554 000000 . 0 

6505 

6506 026556 177771 . 177771 s SOURCE 
6507 026560 150000 150000 sDEST 
6506 026562 000010 . 10 

= 026564 177640 ° 177640 

6511 026566 177742 . 177742 s SOURCE 
6512 026570 100000 . 100000 sDEST 
6513 026572 000011 . 11 

oe 026574 177777 . 177777 

651 

6516 026576 177764 ; 177764 3s SOURCE 
6517 026600 100000 100000 sDEST 


E10 
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SEQ 0121 
eeeeeeeecese DOUBLE OPERAND TESTS sescecesecesececes 

6518 026602 000010 -WORD 10 
6519 026604 177770 .WORD 177770 
6520 
6521 026606 177750 -WORD 177750 3 SOURCE 
6522 026610 052525 -WORD 52525 ;0EST | 
6523 026612 000004 .WORD 4 
aH 026614 000000 -WORD O 
6 
6526 026616 177760 .WORD 177760 s SOURCE 
6527 026620 100000 -WORD 100000 sDEST 
6526 026622 000011 -WORD 11 
6529 026624 177777 -WORD 177777 
6530 
6531 026626 177770 -WORD 177770 3 SOURCE 
6532 026630 100000 -WORD 100000 sDEST | 
6533 026632 000010 -WORD 10 
6534 026634 177600 -WORD 177600 
6536 026636 177712 -WORD 177712 s SOURCE 
6537 026640 004367 .WORD 4367 sDEST 

026642 000015 -WORD 13 
6539 026644 156000 -WORD 156000 
6541 026646 177764 -WORD 177764 : SOURCE 
6542 026650 017777 -WORD 17777 ;DEST 
6543 026652 000001 -WORD 1 
os 026654 000001 -WORD 1 
6546 026656 177701 -WORD 177701 3 SOURCE 
6547 026660 110000 -WORD 110000 3sDEST 
6548 026662 000003 -WORD 3 
= 026666 000240 FIN127: NOP 

3 

6555 026670 TE130: 
6556 : TEST ASHC (ARITHMETIC SHIFT COMBINED) 
6557 026670 005037 177776 CLR 90177776 sINIT PSW 
6558 026674 012761 000023 MOV #23,R1 sSETUP Ri 
6559 026700 012705 052525 #52525 ,R5 sSETUP RS 
6560 026704 005004 CLR RA sSETUP R4 
6561 026706 000277 scc 3SET AL CC BITS 
6562 026710 073401 ASHC R1,R4 3 TEST INSTRUCTION 
6563 026712 023727 177776 000012 CMP @0177776,¢12 3IS PS CORRECT 
6564 026720 001401 BEQ 1$ sYES GO ON 
6565 026722 104001 ERROR +1 3CPU 
6566 sNO GO TO ERROR 
6567 026724 020127 000023 18: CMP R1,023 sIS R1 CORRECT 
6568 026730 001401 BEQ es sYES GO ON 
6569 026732 104001 EAROR ol 1CPU 
6570 sNO GO TO ERROR 
6571 026734 020427 125250 2s: CMP R4, 125250 3IS R4 CORRECT | 
6572 026740 001401 BEQ 3% sYES GO ON 
oh 026742 104001 ERROR ol 
6575 026744 020527 000000 3%: CMP R500 
6576 026750 001401 BEQ 4s 





eeeceeeecese DOUBLE OPERAND TESTS eeecesecesesocess 


6633 027140 


052525 
164731 


000023 
177776 


000000 


177776 
000010 


000012 


000012 


43: 


S$: 


6%: 


7%: 


8$: 
9%: 


108: 


13%: 


14%; 


Res BERS BES BES BES RERERSES 8 


F10 
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ol 

#52525 ,,R3 
R2 

#164731 ,R4 
023,R3 
80177776,¢12 
S$ 

+1 

R2,00 

6% 

+1 

R3,00 

7% 

o1 
—_— 
+1 


@TE130A,R1 


R1,R4 
2(R1),R2 
4(R1),R3 
(R1),R2 
80177776,6(R1) 
10% 

o1 
10(R1),R2 
11% 

o1 
12(R1),R3 
123 

ol 

R4,R1 

13% 

o1 


R4,R1 
(R1),CR4) 
14% 


‘SET mL cc 


3 
sNO GO TO ERROR 


BITS 


sSETUP POINTERS TO TABLES 


sSAVE A COPY OF R1 
sSETUP R2 


3s SETUP 


R3 
sSET ALL CC BITS 
s TEST INSTRUCT ION 


sIS PS CORRECT 
ON 


sCPU ERROR 
:NO GO TO ERROR 


ERROR 
sIS Ri CORRECT 
sYES GO ON 


IS — CORRECT 


sYES GO ON 
:CPU ERROR 
sNO GO TO ERROR 


sPOSSIBLE SOURCE 
3GO0 TO NEXT TEST 
sARE WE DONE 
3NO GO TO 9$ 


CODE CORRUPTION 


SEQ 0122 


6690 027276 


125 
177777 
177777 


065700 


3 
3 
TE130A: 


a 


FIN130 


177700 


100125 
177777 
10 


100125 
177777 
177777 
1 


t°) 
0 


ie) 
100000 


177701 
47777 


65700 
12 


G10 
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eeeceeeseese DOUBLE OPERAND TESTS seccecesscocceses 


s SOURCE 
sDESTINATION WORD 1 
sDESTINATION WORD 2 
sTEST PSw ‘ 


s SOURCE 
sOESTINATION WORD 1 
sDESTINATION WORD 2 
sTEST PSW 

sRESULT WORD 1 
sRESULT WORD 2 


3 SOURCE 
sDESTINATION WORD 1 
sDESTINATION WORD 2 
sTEST PSW 

sRESULT WORD 1 
s;RESULT WORD 2 


s SOURCE 
sDESTINATION WORD 1 
sDESTINATION WORD 2 
sTES?T PSw 

sRESULT WORD 1 
sRESULT WORD 2 


s SOURCE 
sOESTINATION WORD 1 
sDESTINATION WORD 2 


sRESULT WORD 2 


3s SOURCE 
sOESTINATION WORD 1 
sOESTINATION WORD 2 
sTEST PSW 

sRESULT WORD 1 
sRESULT WORD 2 


s SOURCE 
sDESTINATION WORD 1 
sDESTINATION WORD 2 


s SOURCE 
sDESTINATION WORD 1 
sDESTINATION WORD 2 


SEQ 0123 





| LR oR aera el ae 
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SEQ 0124 

eeceecsesese DOUBLE OPERAND TESTS eeccccesesesesess 

6691 027300 000011 -WORD 11 sTEST PSwW 

6692 027302 177777 .WORD 177777 sRESULT WORD 1 

6693 027304 177777 WORD 177777 sRESULT WORD 2 

6454 

6695 027306 177725 .WORD 177725 3s SOURCE 

66% 027310 177777 .WORD 177777 sOESTINATION WORD 1 

6697 027312 174000 -WORD 174000 sOESTINATION WORD 2 

6698 027314 000007 -WORD 7 sTEST PSW 

6699 027316 000000 -WORD O sRESULT WORD 1 

6700 027320 000000 -WORD O sRESULT WORD 2 

6701 

6702 027322 177724 -WORD 177724 3 SOURCE 

6703 027324 177777 -WORD 177777 sDESTINATION WORD 1 

6704 027326 174000 -WORD 174000 sOESTINATION WORD 2 

6705 027330 000011 -WORD il 3sTEST PSW 

6706 027332 100000 .WORD 100000 sRESULT WORD 1 

aa 027334 -WORD O sRESULT WORD 2 

6709 027336 177733 -WORD 177735 3s SOURCE 

6710 027340 177777 -WORD 177777 sDESTINATION WORD 1 

6711 027342 157023 -WORD 1570235 sDESTINATION WORD 2 

6712 027344 000012 -WORD 12 sTEST PSw 

6713 027346 114000 -WORD 114000 sRESULT WORD 1 

rth 027350 000000 -WORD O sRESULT WORD 2 

6716 027352 177727 -WORD 177727 3 SOURCE 

6717 027354 000000 -WORD O sDESTINATION WORD 1 

6716 027356 177777 .WORD 177777 sDESTINATION WORD 2 

6719 027360 000015 -WORD 13 sTEST PSW 

6720 027362 177600 .WORD 177600 sRESULT WORD 1 

ores 027364 000000 -WORD O sRESULT WORD 2 

6723 027366 177717 -WORD 177717 3s SOURCE 

6724 027370 177777 -WORD 177777 sDESTINATION WORD 1 

6725 027372 000001 -WORD 1 sDESTINATION WORD 2 

6726 027374 000011 -WORD 11 sTEST PSW 

6727 027376 100000 -WORD 100000 sRESULT WORD 1 

tnd 027400 100000 -WORD 100000 sRESULT WORD 2 

6730 027402 177741 -WORD 177741 3s SOURCE 

6731 027404 100000 -WORD 100000 sDESTINATION WORD 1 

6732 027406 000000 WORD sOESTINATION WORD 2 

6733 027410 000010 -WORD 10 sTEST PSW 

6734 927412 177777 -WORD 177777 sRESULT WORD 1 

eh a 027414 177777 -WORD 177777 sRESULT WORD 2 

6737 027416 177742 -WORD 177742 3 

6738 027420 037777 -WORD 37777 sDESTINATION WORD 1 

6739 027422 177777 -WORD 177777 sOESTINATION WORD 2 

6740 027424 000005 -WORD 5 :TEST PSW 

6741 027426 000000 -WORD O sRESULT WORD 1 

em 027430 000000 -WORD O sRESULT WORD 2 

6744 027432 177742 -WORD 177742 s SOURCE 

6745 027434 077777 -WORD 77777 sDESTINATION WORD 1 

6746 027436 177777 -WORD 177777 sDESTINATION WORD 2 

6747 027440 000001 -WORD 1 ; TEST PSW 


110 
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6748 027442 000000 -WORD O sRESULT WORD 1 
6749 027444 000001 -WORD 1 sRESULT WORD 2 
6750 
6751 027446 177711 -WORD 177711 s SOURCE 
6752 027450 065600 .WORD 65600 sOESTINATION WORD 1 
6753 027452 000012 -WORD 12 sDESTINATION WORD 2 
6754 027454 000003 -WORD 3 sTEST PSw 
6755 027456 000000 -WORD O sRESULT WORD 1 
or 027460 012000 -WORD 12000 sRESULT WORD 2 
6 
6758 027462 177740 . WORD 177740 3 SOURCE 
6759 027464 077777 . WORD 77777 sDESTINATION WORD 1 
6760 027466 177777 -WORD 177777 sDESTINATION WORD 2 
6761 027470 000004 .WORD 4 sTEST PSW 
6762 027472 000000 -WORD O sRESULT WORD 1 
6763 027474 000000 -WORD O sRESULT WORD 2 
6765 027476 177737 -WORD 177737 3 SOURCE 
6766 027500 177777 -WORD 177777 sDESTINATION WORD 1 * 
6767 027502 177774 WORD 177774 sDESTINATION WORD 2 
6766 027504 000011 -WORD 11 sTEST PSW 
6769 027506 177777 -WORD 177777 sRESULT WORD 1 
oon 027510 177777 -WORD 177777 sRESULT WORD 2 
6772 027512 177747 WORD 177747 3 SOURCE 
6773 027514 100000 -WORD 100000 sDOESTINATION WORD 1 
6774 027516 174000 -WORD 174000 sDESTINATION WORD 2 
6775 027520 10 -WORD 10 sTEST PSW 
6776 027522 177777 -WORD 177777 sRESULT WORD 1 
hd 027524 177700 .WORD 177700 sRESULT WORD 2 
©779 027526 177753 -WORD 177753 
6780 027530 . WORD 324 sDESTINATION WORD 1 
6781 027532 071002 -WORD 71002 sDESTINATION WORD 2 
6782 027534 000001 -WORD 1 sTEST PSW 
6783 027536 000000 -WORD O sRESULT WORD 1 
— 027540 000146 -WORD 146 sRESULT WORD 2 
6766 027542 177765 -WORD 177765 3 SOURCE 
6787 027544 102351 -WORD 102351 sDESTINATION WORD 1 
6788 027546 177231 -WORD 177231 sOESTINATION WORD 2 
6789 027550 000011 . WORD sTEST PSW 
6790 027552 177760 -WORD 177760 sRESULT WORD 1 
6791 027554 116477 -WORD 116477 sRESULT WORD 2 
6792 027556 - FIN130: 
ee 027556 MSPAU: 
6797 3 TEST THAT AUTO DEC/INC OPERATIONS USING SP ARE ON WORD BOUNDRYS 
6798 027556 CLR R6 ;CLEAR SP 
6799 027560 112667 153334 (R6)+, COUNT i TRY AUTOINC ON 
6800 027564 022706 000002 CMP #2 ,R6 ;VERIFY AUTO INC "or 2 
6801 027570 001401 BEQ SPAU1 sBRANCH IF GOOD 
;BAD AUTO-INC 
6803 027572 104001 ERROR ol :;CPU ERROR 
6804 927574 SPAU1: CLR R6 sCLEAR R6 
6805 027576 112667 153316 MOvB (R6)+, COUNT 
6806 027602 112667 153312 MOvB CR6)+, COUNT ;DOUBLE BYTE AUTO-INC 





J10 
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$ 
sR6 IMPROPERLY DECRIMENTED 
sOR CPU ERROR REGISTER NOT CORRECT 


SEQ O 
eeececeseese DOUBLE OPERAND TESTS seeeesesesesesess 126 
6807 027606 022706 000004 CMP 04 ,R6E sVERIFY RESULT 
6808 027612 001401 BEQ SPAV2 sBRANCH IF GOOD 
6809 027614 104001 ERROR +1 3;CPU ERR 
10 BAD DOUBLE AUTO-INC 
6811 027616 012706 601000 SPAU2: MOV @STBOT ,R6 sLOAD R6 
6812 027 114667 153272 MOVB -(R6), COUNT 3 TEST AUTO-DEC 
6813 027626 022706 000776 CMP 0776 ,,.R6 sVERIFY RESULT 
6814 027632 001401 BEQ SPAUS sBRANCH IF COOD 
6815 027634 104001 ERROR o1 3CPU ERROR 
6817 027636 012706 001000 SPAU3: MOV @STBOT ,R6 sLOAD R6 
6816 027642 114667 153252 MOVB -CR6), COUNT s TEST AUTO-DEC 
6819 027646 114667 155246 MOVB -C(R6), COUNT 3 TEST AUTO-DEC 
0276 022706 000774 CMP 0774 ,R6 sVERTFY RESULT 
6821 027656 001401 BEQ SPAU4 sBRANCH IF GOOD 
6822 027660 104001 ERROR ol ;CPU ERROR 
6824 027662 SPAU4: CLR R6 s TEST AUTO-INC ON SOP 
6825 027664 105726 TSTB (R6)« s TEST AUTO-INC 
6826 027666 020627 000002 CMP R602 
6827 027672 001401 BEQ SP. sBRANCH IF GOOD 
6828 027674 104001 ERROR +1 3;CPU ERROR 
6830 027676 012706 001000 SPAUS: #STBOT ,R6 sLOAD R6 
6831 027702 105746 TST8 CR6) 3; TEST AUTO-DEC 
6832 027704 022706 000776 CMP #776 ,R6 ;VERIFY RESULT 
6833 027710 001401 BEQ SPAU6 sBRANCH IF GOOD 
6834 027712 104001 ERROR o1 3CPU ERROR 
res 027714 012706 001000 SPAU6: MOV @STBOT ,R6 
39 a 
6841 027720 i MTRY: 
6843 3 VERIFY YELLOW ZONE TRAP ON AUTO DEC OF R6 
6844 027720 005067 150042 CLR CPEREG sINIT CPU ERROR REGISTER 
6845 027724 012706 000150 MOV #150 ,R6 sLOAD “ WITH A VALUE THAT WILL 
sCAUSE A YELLOW STACK TRAPCIE. <400) 
6847 027730 016767 1 153054 MOV 4,SL0C00 : SAVE VECTOR 
6848 027736 012767 027774 150040 MOV @MTRYA,4 sSETUP THE STACK OVERFLOW TRAP POINTER 
6849 027744 016701 150176 MOV 146,R1 sSAVE VECTOR 
6850 027750 016702 150170 MOV 144, sSAVE VECTOR 
6851 027754 016703 150162 MOV 142,R3 sSAVE VECTOR 
6852 027760 150162 CLR 46 sJUST AS A PRECAUTION 
6853 027764 CLR -(R6) sCAUSE A STACK OVERFLOW TRAP 
68654 027766 012706 001000 MOV @STBOT ,.R6 sRESTORE R6 FOR ERROR CALL 
6855 027772 104001 ERROR ol 3CPU ERROR 
sOVERFLOW TRAP FAILED 
6857 027774 MTRYA: j 
6858 027774 022767 000010 147764 CMP @8ITOS , CPEREG sWAS CPU ERROR REG SET PROPERLY? 
6859 030002 001003 BNE 1% 3GO TO ERROR IF NOT 
0 020627 000142 CMP R6, 0142 sVERIFY CORRECT DECRIMENT OF RE 
6861 030010 001401 BEQ MTRYB sBRANCH IF GOOD 
0 104001 1s: ERROR ol 
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| 
6866 030014 7 14774 CLR CPEREG sCLEAR THE a ERROR REGISTER 
6867 030020 016767 152766 147756 MOV SLOCOO ,4 sRESTORE VECTOR 
030026 010167 150114 MOV R1,146 sRESTORE VECTORS 
6869 030032 010267 150106 MOV R2,144 3 - 
6870 030036 010367 150100 MOV R3,142 3 ° 
6871 030042 012706 001000 MOV @STBOT ,R6 
6872 
6873 
6875 3 
oon 030046 MTRYM: 
68 
6879 3 TEST STACK OVERFLOW TRAPS IN VARIOUS MODES 
6880 030046 005067 147714 CLR CPEREG sCLEAR CPU ERROR REGISTER 
6881 030052 012706 000400 MOV #400 ,R6 sSETUP OVERFLOW R6 DATA 
6882 030056 016767 147722 152726 MOV 4,SLOCOO sSAVE VECTOR 
030064 012767 030106 147712 MOV @TRYMA,4 
6884 030072 005067 150300 CLR 376 sJUST AS A PRECAUTION 
6885 030076 005046 CLR -(R6) sCAUSE OVERFLOW TRAP 
6886 030100 012706 001000 MOV @STBOT .R6 }RESTORE R6 FOR ERROR CALL 
68687 030104 104001 ERROR ol ;CPU ERROR 
3sNO OVERFLOW TRAP 
6889 030106 TRYMA:; 
6890 030106 005067 147654 CLR G sCLEAR CPU a REGISTER 
68691 030112 012705 001000 MOV #1000 ,,R5 }SETUP RS DATA 
68692 030116 012706 000400 MOV oR6 sSETUP OVERFLOW R6 DATA 
68693 030122 012767 030140 147654 MOV @TRYMB 4 
6894 030150 064645 ADO -(R6), -CRS) sCAUSE OVERFLOW T 
6895 030132 012706 001000 MOV @STBOT, SRESTORE R6 FOR ERROR CALL 
6896 030136 104001 ERROR o1 3CPU ERROR 
97 3NO OVERFLOW TRAP 
6898 030140 TRYMB: 
6899 030140 005067 147622 CLR G ;CLEAR CPU ERROR REGISTER 
6900 030144 012706 000150 MOV #150 ,R6 sSETUP OVERFLOW R6 DATA 
6901 030150 012767 030166 147626 MOV @TRYMC 4 
6902 030156 044 BIC -(RS), -CR6) sCAUSE OVERFLOW T 
6903 030160 012706 001000 MOV @STBOT .R6 }RESTORE R6 FOR ERROR CALL 
6904 030164 104001 ERROR ol ;CPU ERROR 
6905 3NO OVERFLOW TRAP 
6906 030166 7 147574 TRYMC: CLR sCLEAR CPU ERROR REGISTER 
6907 030172 016767 152614 147604 MOV SLOCOO 4 iRESTORE VECTOR 
6908 0 012706 001000 MOV @STBOT ,R6 
6909 
6910 
6912 3 
ore 030204 MILLO 
6916 3 TEST STACK OVERFLOW ON ILLEGAL INST Ly 
6917 O 005067 147556 CLR CPEREG sCLEAR CPU ERROR REGISTER 
6918 030210 012706 000400 MOV oR6 :SETUP FOR OVERFLOW TRAP 
6919 030214 016767 147570 152570 MOV 10,SLO0CO0O sSAVE VECTOR 
0 012767 030250 147560 MOV OA,i0 ;SETUP ILLEGAL TRAP VECTOR 
6921 030230 016767 147550 152556 MOV 4,SL0C01 sSAVE VECTOR 
6922 030236 012767 030256 147540 MOV @MILLOB 4 sSETUP OVERFLOW TRAP VECTOR 
6923 030244 000077 77 sUNUSED INSTRUCTION TRAP 
6924 030246 NOP 
6925 030250 012706 001000 MILLOA: MOV @STBOT ,R6 sRESTORE R6 FOR ERROR CALL 
6926 030254 104001 ERROR +1 3;CPU ERROR 





6932 030276 


016767 
016767 
005067 
012706 


016767 
016767 


016767 
016767 
005067 


012706 


152532 
152522 
147470 
001000 


147516 


147412 
147420 


147350 
147316 


MILLOB: 


; 
MIOTO: 


MEMTO: 


MTRPO: 


L10— 
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s UNUSED 
MOV SL0C01,4 
MOV SLOCOO,10 
CLR CPEREG 
MOV @STBOT RE 


TEST STACK OVERFLOW ON IOT TRAP 
CPEREG 


sRESTORE VECTOR 
sCLEAR CPU ERROR REGISTER 
sRESTORE R6 


CLR ;CLEAR CPU ERROR REGISTER 
MOV ° sSETUP STACK FOR OVERFLOW 
MOV 20, SLOCOO sSAVE OLD IOT VECTOR 
MOV @IOTOA,20 sSETUP ERROR ACTION ON IOT 
MOV 4,SL0C0O1 sSAVE VECTOR 
MOV @I0TO8 .4 sSETUP CORRECT TRAP VECTOR FOR 
s OVERFLOW 
+ ; TEST INSTRUCTION 
MOV @STBOT ,R6 sRESTORE R6 FOR ERROR CALL 
ERROR +1 ;CPU ERROR 
sFAILURE OF STACK OVERFLOW 
CLR CPEREG ;CLEAR CPU ERROR REGISTER 
MOV @STBOT ,R6 
MOV SLOCO1,4 sRESTORE VECTOR 
MOV SLOCOO , 20 sRESTORE TRAP VECTOR 


TEST STACK OVERFLOW ON EMT TRAP 
R CPEREG 


Cu 

MOV #400 , R6 
MOV 30, SLOCOO 
MOV @EMTOA , 30 
MOV 4,S.0C01 
MOV 08,4 
EMT 

NOP 

MOV @STBOT ,R6 
ERROR +1 j 
MOV SLOCOO , 30 
MOV $L0C01,4 
CLR CPEREG 
MOV @STBOT .R6 


TEST STACK OVERFLOW ON TRAP 


;CLEAR CPU ERROR REGISTER 
sSETUP STACK FOR OVERF_OW 
sSAVE OLD EMT VECTOR 
sSETUP ERROR ACTION ON EMT 
sSAVE VECTOR 
sSETUP CORRECT TRAP VECTOR FOR 


s OVERFLOW 
3; TEST INSTRUCTION 
;RESTORE R6 FOR ERROR CALL 


ERROR 
sFAILURE OF STACK OVERFLOW 


sRESTORE TRAP VECTOR 
sRESTORE VECTOR 


INSTRUCTION TRAP 
sRESTORE VECTOR 
s;CLEAR CPU ERROR REGISTER 


147264 
000400 
147322 
030542 
147256 
030550 
001000 
152236 


152232 
147176 
001000 


147166 
000400 
147204 
030640 
147160 
030646 


001000 
147114 


147070 
000400 


001000 


147256 
147220 


147134 
147116 


TRPOA: 


TRPOB: 


MBPTO: 


BPTOA: 


MILAO: 


ILAOA: 


CLR 


$3338 


3 
B 


cee 386 


S630 s8seee 


#400 ,R6 
10, SLOCOO 
@ILAOA, 10 
4,SL0C01 
#16808 ,4 


R1 
Ri 


@STBOT ,R6 


M10 ae 
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sCLEAR CPU ERROR REGISTER 
sSETUP STACK FOR OVERFLOW 
} SAVE OLD TRP VECTOR 
sSETUP ERROR ACTION ON TRP 
sSAVE VECTOR 
s;SETUP CORRECT TRAP VECTOR FOR 


3; OVERFLOW 
s TEST INSTRUCTION 
sRESTORE R6 FOR ERROR CALL 


:CPU ERROR 


sFAILURE OF STACK OVERFLOW 


sRESTORE TRAP VECTOR 
sRESTORE VECTOR 
s;CLEAR CPU ERROR REGISTER 


;CLEAR CPU ERROR REGISTER 
sSETUP STACK FOR OVERFLOW 
sSAVE OLD BPT VECTOR 
;SETUP ERROR ACTION ON BPT 
; SAVE VECTOR 
3;SETUP CORRECT TRAP VECTOR FOR 


; OVERFLOW 
; TEST INSTRUCTION 
sRESTORE R6 FOR ERROR CALL 


;CPU ERROR 


sFAILURE OF STACK OVERFLOW 


;CLEAR CPU ERROR REGISTER 
sRESTORE TRAP VECTOR 
sRESTORE VECTOR 


Ly STACK OVERFLOW AND ILLEGAL JMP INSTRUCTION 
CPEREG 


;CLEAR CPU ERROR REGISTE 
sSETUP STACK FOR MOVERFLOM! 
SAVE OLD ILLEGAL INST. VECTOR 


sSETUP ERROR ACTION ILLEGAL OPCODE 


;SAVE VECTOR 

;SETUP CORRECT TRAP VECTOR FOR 
; OVERFLOW 

; TEST INSTRUCTION 


sRESTORE R6 FOR ERROR CALL 


_— —_—-—-— — _ a ee ee - Se ee - —_— — 
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7051 030744 104001 ERROR +1 ;CPU ERROR 
7052 sFAILURE OF STACK OVERFLOW 
7053 030746 IL608 
7054 030746 016767 152042 147030 MOV $L0C01,4 ousron VECTOR 
7055 030754 016767 152032 147026 MOV SLOCOO,10 RESTORE TRAP VECTOR 
7056 030762 005067 147000 CLR CPEREG ;CLEAR cPu ERROR REGISTER 
7057 030766 012706 001000 MOV @STBOT .R6 
7058 
7060 3 
7061 3 
7063 030772 MILLBO: 

: TEST STACK OVERFLOW ON ILLEGAL JSR INST 

7066 030772 012706 000400 MOV #400 ,R6 ;SETUP STACK FOR OVERFLOW 
7067 030776 016767 147006 152006 MOV 10, SL0C00 ;SAVE OLD VECTOR 
7068 031004 012767 031034 146776 MOV @ILLBOA,10 sSETUP ERROR ACTION ON ILL. OPCODE 
7069 031012 016767 146766 151774 MOV 4,S.0C01 ; SAVE VECTOR 
7070 031020 012767 031042 146756 MOV #ILLB08 ,4 sSETUP CORRECT TRAP VECTOR FOR 
7071 S OVERFLOW 
7072 031026 005001 CLR R1 
7073 031030 004501 JSR RS,R1 ; TEST INSTRUCTION 
7074 031032 000240 NOP 
7075 031034 012706 001000 ILLBOA: MOV @STBOT .R6 sRESTORE R6 FOR ERROR CALL 
7076 031040 104001 ERROR +1 F ERROR 
7077 ;FAILURE OF STACK OVERFLOW 
7078 031042 ILLBOB: 
7079 031042 016767 151746 146734 MOV SLOCO1,.4 sRESTORE VECTOR 
7080 031050 016767 151736 146732 MOV SLOCOO,10 sRESTORE TRAP VECTOR 
oo 031056 012706 001000 MOV @STBOT .R6 
7084 ; 
7085 
2° 031062 MSTO 
7089 F TEST FOR FALSE STACK OVERFLOW 
7090 031062 016767 146716 151722 MOV 4,S.0C00 sSAVE VECTOR 
7091 031070 012767 031136 146706 MOV @MSTOE .4 sANTICIPATE OVERFLOW ERROR 
7092 031076 012706 001002 MOV #1002 ,R6 sSETUP LEGAL R6 
7093 031102 005746 TST -(R6) sTRY TO CAUSE STACK OVERFLOW 
7094 031104 012706 002002 MOV #2002 ,R6 sSETUP LEGAL R6 
7095 031110 005746 TST -(R6) ;TRY am CAUSE STACK OVERFLOW 
7096 031112 012706 004002 MOV #4002 ,R6 ;SETUP LEGAL R6 
7097 031116 005746 TST -(R6) sTRY TO CAUSE STACK OVERFLOW 
7098 031120 012706 010002 MOV #10002 ,R6 sSETUP LEGAL R6 
7099 031124 005746 TST -(R6) sTRY TO CAUSE STACK OVERFLOW 
7100 C31126 012706 100402 MOV #100402 ,R6 ;SETUP LEGAL R6 
7101 031132 005746 TST -(R6) i TRY TO CAUSE STACK OVERFLOW 
7102 031134 000403 BR MS TOEE ;EXIT MODULE 
7103 031136 012706 001000 MSTOE: MOV @STBOT RE ;RESTORE R6 FOR ERROR CALL 
7104 031142 104001 ERROR +1 ;CPU ERROR 
7105 ;STACK OVERFLOW ERROR 
7106 031144 016767 151642 146632 MSTOEE: MOV SLOCOO ,4 sRESTORE VECTOR 
Lg 031152 012706 001000 MOV @STBOT RE 
7110 3 
7111 
7113 031156 MTT 


Bh bees a oy ee 
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SEQ 0131 


7114 


7115 : TEST T-BIT TRAPS 

7116 031156 012706 001000 MOV @STBOT RE sSETUP STACK 

7117 031162 016767 146626 151622 MOV 14, SLOCOO sSAVE OLD 1T-6IT VECTOR 
7118 031170 012746 000020 MOV $20, -(R6) sPUSM T-BIT 

7119 031174 012746 031212 MOV OMTTA, -(R6) sSETUP ERROR TRAP VECTOR 
7120 031200 012767 031214 146606 MOV eMTTG,14 sSETUP NEW T-BIT VECTOR 
7121 031206 000002 RTI ;CAUSE A T BIT SET IN PSw 
7122 031210 104001 ERROR +1 sCPU ERROR 

7123 sSHOULD NEVER BE EXECUTED 

7124 031212 104001 MTTA: ERROR +1 : ERROR 

7125 sOIONT TAKE CORRECT TRAP 

7126 031214 022706 000774 MTT: CHP @STBOT -4,R6 sVERIFY SP DECIRMENT 
7127 031220 001401 BEQ MTTD s@RANCH IF GOOD 

7126 031222 104001 ERROR +1 sCPU 

7123 3BAD SP 

7130 031224 021627 031212 MTTD: CMP (R6), OMTTA sVERIFY PC SAVED ON STACK 
7131 031230 001401 BEQ MTTE s@RANCH IF GOOD 

7132 031232 106001 ERROR +1 sCPU ERROR 

7133 sINCORRECT PC ON STACK 

7134 031234 MTTE: 

7135 031234 016767 151552 146552 MOV SLOCOO, 14 sRESTORE VECTOR 14 

7137 031242 012706 001000 MOV @STBOT RE 

7140 

7142 031246 MTTS 

7143 

7144 3 TEST T-BIT TRAPS WITH RTT 

7145 031246 012706 001000 MOV @STBOT RE sSETUP STACK 

7146 031252 016767 146536 151532 MOV 14, SLOCOO ;SAVE OLD T-BIT VECTOR 
7147 031260 012746 000020 MOV 020, -(R6 sPUSH T-BIT 

7148 031264 012746 031302 MOV @MTTSA, -(R6) sSETUP ERROR TRAP VECTOR 
7149 031270 012767 031306 146516 MOV eMTTSB 14 sSETUP NEW T-BIT VECTOR 
7150 031276 000006 RTT sCAUSE A T BIT SET IN PSK 
7151 031300 104001 ERROR +1 sCPU ERROR 

7152 sSMOULD NEVER BE EXECUTED 

7153 031302 000240 MTTSA: NOP sRTT WELL EXECUTE THIS INSTRUCTION 
71 sWITM A T-BIT TRAP 

7155 031304 104001 MTTSQ: ERROR +1 sCPU ERROR 

71 sOIONT TAKE CORRECT TRAP 

7157 031306 022706 000774 MTTSB: CHP @STBOT -4,R6 ;VERIFY SP DECIRMENT 
7158 031312 001401 BEQ MTTSO s@RANCH IF GOOD 

7159 031314 104001 ERROR +1 sCPU ERROR 

7160 3BAD SP 

7161 031316 021627 031304 MTTSO: CHP (R6), OMTTSQ sVERIFY PC SAVED ON STACK 
7162 031322 001401 r* 2) MTTSE sBRANCH IF GOOD 

7163 031324 104001 ERROR +1 :CPU ERROR 

7164 sINCORRECT PC ON STACK 

7165 031326 MT TSE 

7166 031326 016767 151460 146460 Ov SLOCOO, 14 sRESTORE VECTOR 14 

7167 031334 012706 001000 MOV @STBOT RE 

7171 031340 MTTR: 

717 

7173 ' TEST OLD STATUS ON T-BIT TRAP 

7174 031340 012706 001000 MOV @STBOT RE sSETUP STACK 


7175 031344 
7176 031352 
0315356 


e0e 

7205 031472 
7206 031472 
7207 031500 


016767 
012706 


146444 


000020 
031404 
031406 
000357 


147364 


147312 


151314 
001000 


151236 
061000 


151440 


146424 
146400 


000377 


146314 


151274 
146264 


146232 


MTTRA: 
MTTRB: 


MTTRC: 


MTTRO: 
MTTRE: 


MTTRE : 


Cil 
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@357,PS 


+1 

+1 
STBOT -2, 020 
MTTRC 

ol 


$3338 953 ; g2RS8e82 


2O 
=o 
oO 


+1 

STBOT -2,0377 
MT TRF 

o1 


SLOCOO, 14 
@STBOT .R6 


38 a53 : ; 


TEST RESERVED INST TRAP 
MOV @STBOT , RE 


mov 10, SLOCOO 
ORB, 10 

77 

ERROR +1 

cer @STBOT -4 ,R6 

BEQ ARTE 

ERROR +1 


CoP (R6), OMRTA 
BE MRTF 
ERROR +1 


MOV SLOCOO, 10 
MOV @STBOT RE 


sSAVE OLD re 


iSET PRIORITY AND COND C 
:CPU ERROR 
os NEVER EXECUTE 
’ 
sOIONT TAKE CORRECT TRAP 
sVERIFY PSW ON STACK 
sBRANCH IF CORRECT STATUS 


sCPU ERROR 
16AD STATUS ON STACK 


sSETUP STACK 

sPUSH T-BIT 

s SETUP T 
sSETUP NEW ey VECTOR 
sCLEAR PRIORITY 


OR 
sCLEAR CONDITION CODES 


sCPU ERROR 
sSHOULD NEVER EXECUTE 


sCPU 

sOIONT TAKE CORRECT TRAP 
sVERIFY OLD PSW ON STACK 
sBRANCH IF GOOD 

3;CPU ERROR 

3:0L0 PSW INCORRECT 
sRESTORE VECTOR 


sSETUP STACK 
sSAVE OLD 


VECTOR 
sSETUP NEW RESERVED VECTOR 


3CPU ERROR 

sOIONT TAKE CORRECT TRAP 
sVERIFY SP DECRIMENT 
sBRANCH IF GOOD 

sCPU 


ERROR 
3840 PC ON STACK 
sVERFY PROPER PC ON STACK 
sBRANCH IF GOOD 
3:CPU ERROR 
s INCORRECT PC ON STACK 


sRESTORE TRAP VECTOR 


— ——— ee Se. .._ - 


SEO 0132 


Dil 
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SEQ 0133 

eeeeceeseeee DOUBLE OPERAND TESTS seccescsecesosess Q 

7235 ’ 

2 031562 MRTO: 

2 

7239 3 TEST OLD STATUS ON RESERVED INST TRAP 

7240 031562 012706 001000 MOV @STBOT ,R6 sSETUP STACK | 

7241 031566 016767 146216 151216 MOV 10,SL0C00 sSAVE OLD VECTOR 

7242 031574 012767 031614 146206 MOV @#RTOB 10 SSETUP NEW VECTOR 

7243 031602 005067 146170 CLR PS sCLEAR PRIORITY AND COND C 

7244 031606 000257 ccc 

7245 031610 000077 7 

7246 031612 104001 MRTOA: ERROR +1 3sCPU ERROR 

7247 sDIDONT TAKE CORRECT oa 

7248 031614 026727 147156 000000 MRTOB: CHP STBOT -2,00 sVERIFY PSW ON STACK 

7249 031622 001401 BEQ MRTOC sBRANCH IF CORRECT STATUS 

7250 031624 104001 ERROR 1 3sCPU ERROR 

7251 38AD STATUS ON STACK 

7252 031626 012706 001000 MRTOC: MOV @STBOT .R6 ie 

7253 031632 012767 031654 146150 @PRTOE .10 3SET UP TRAP VECTOR 

7254 031640 012767 000 146130 0357,PS sSET PRIORITY 

7255 031646 000277 scc 3sSET CONDITION CODES 

Ma. 031650 000077 77 sRESERVED INSTRUCTION 

7258 031652 104001 MRTOD: ERROR +1 sCPU ERROR 

7259 sOIONT TAKE CORRECT TRAP 

7260 031654 026727 147116 000357 MRTOE: CrP STBOT-2, 0357 sVERIFY OLD PSW ON STACK 

7261 031662 001401 3EQ ARTOF sBRANCH IF GOOD 

7262 031664 104001 ERROR 1 sCPU ERROR 

7263 30LD PSW INCORRECT 

7264 031666 MRTOF : 

7265 031666 016767 151120 146114 MOV $SLOCOO.10 sRESOTRE TRAP VECTOR 

_ 031674 012706 001000 MOV @STBOT .R6 

7270 031700 MTP; | 

7271 

7272 3 TEST TRAP INST | 

7273 031700 012706 001000 MOV @STBOT .R6 sSETUP STACK 

7274 031704 016767 146124 151100 MOV 34 ,SLOCOO sSAVE OLD VECTOR 

7275 031712 012767 931732 146114 MOV OMTPB , 34 sSETUP NEW TRAP VECTOR 

7276 031720 005067 146052 CLR PS sCLEAR PRIORITY ABNOD COND C 

7277 031724 000257 ccc 

7276 031726 104400 TRAP 

7279 031730 104001 MTPR: ERROR 1 sCPU ERROR 

Los ;OIONT TAKE CORRECT TRAP 

7261 031732 022706 000774 MTPB: CMP @STBOT -4,R6 sVERIFY SP DECRIMENT 

7262 031736 001401 BEQ ioc Ge 

7263 031740 104001 ERROR ol 3sCPU ERROR 

72864 3BAD PC ON S | 

72@5 031742 021627 031730 MTPQ: CMP (R6), OMTPR sVERFY PROPER PC ON STACK 

72866 031746 001401 BEG MT 18R IF | 

7287 031750 104001 ERROR +1 :CPU ERROR | 

7 s INCORRECT PC ON STACK 

7269 031752 MTPF ; 

7290 031752 016767 151034 146054 MOV SLOCOO , 34 sRESTORE VECTOR 

Mba 031760 012706 001000 MOV @STBOT ,R6 

7294 t 

7295 H 


E11 
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SEQ 0134 
ecceesececes DOUBLE OPERAND TESTS secccecsscssosess 
| 
7297 031764 MTPO: 
7298 
7299 3 TEST OLD STATUS SAVED ON TRAP 
7300 031764 012706 001000 MOV @STBOT ,R6 sSETUP STACK 
7301 031770 016767 1460460 151014 MOV 34, SLOCOO sSAVE OLD VECTOR 
7302 031776 012767 O320i16 1460350 MOV OMTPOB , 34 sSETUP NEW TRAP VECTOR 
7303 032004 005067 145766 CLR PS sCLEAR PRIORITY AND COND C 
7304 032010 000257 ccc 
7305 032012 104400 TRAP 
7306 032014 104001 MTPOA: ERROR o1 sCPU ERROR 
7307 sOIONT TAKE CORRECT TRAP 
73086 032016 026727 146754 000000 MTPOB: CHP STBOT-2, 00 sVERIFY PSW ON STACK 
7309 032024 001401 BEQ MTPOC sBRANCH IF CORRECT STATUS 
7310 032026 104001 ERHOR ol 3CPU ERROR 
7311 sB8AD STATUS ON STACK 
7312 032030 012706 001000 MTPOC: MOV @STBOT ,R6 sSETUP STACK 
7313 032034 012767 032056 145772 MOV @MTPOE , 34 sSET UP TRAP VECTOR 
7314 032042 012767 000357 145726 MOV @357,PS 3SET PRIORITY 
7315 032050 000277 scc 3SET CONDITION CODES 
7316 032052 104400 TRAP s ISSUE TRAP 
7317 032054 104001 MTPOD: ERROR ol 3sCPU ERROR 
7318 sOIDONT TAKE CORRECT TRAP 
7319 032056 026727 146714 000357 MTPOE: CHP STBOT -2, 0357 sVERIFY OLD PSW ON STACK 
7320 032064 001401 BEQ MTPOF sBRANCH IF GOOD 
7321 032066 104001 ERROR ol sCPU ERROR 
7 30LD PSW INCORRECT 
7323 032070 MTPOF : 
7324 032070 016767 :50716 145736 MOV SLOCOO , 34 sRESTORE TRAP VECTOR 
Mn 032076 012706 001000 MOV @STBOT ,R6 
7328 3 
7329 3 
teas 032102 MTPA: 
7333 3 TEST ALL TRAP OPCODES - SELF MODIFYING 
7334 032102 CLR R3 sSETUP REGISTER TO INDICATE OPCODE 
7335 032104 012706 001000 MOV @STBOT ,R6 sSETUP STACK 
7336 032110 016767 145720 150674 34,SLO0C sSAVE OLD VECTOR 
7337 032116 016767 145662 150670 MOV 4,0.0C01 1 IN CASE OF HALT 
7338 032124 012767 032154 145652 MOV OMTPAH 4 sSETUP HALT TRAP 
7339 032132 012767 032156 145674 MOV OMTPAA, 34 sSETUP NEW TRAP VECTOR 
Loe 032140 000167 000012 JP MTPAA :GO INTO LOOPING CODE 
3 
7342 032144 000000 MTPAL: WALT 3SET TO A ZERO 
7343 032146 104001 ERROR +1 ;CPU ERROR 
7544 sTRAP INSTRUCTION FAILED TO TRAP 
7345 sEXAMINE OPCCODE AT LOCATION MTFAL: 
Los 032150 (00167 000002 JP MTPAA ;ATTEMPT TO GO ON 
é 
7348 032154 104001 MTPAH: ERROR o1 sCPU ERROR 
T349 sERROR, EITHER CANT MODIFY LOCATION MTPAL 
7350 30R TRAP INSTRUCTION FAILED 
7351 032156 MTPAA; 
oe 032156 005203 NC R3 ;GET NEXT OPCODE 
7354 032160 012706 001000 MOV @STBOT ,R6 sRESTORE STACK 
7355 032164 020327 000400 cep R3, 0400 3SEE IF LAST OPCODE 


Pil 
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eeevceeecese DOUBLE OPERAND TESTS eecccceseseseseses 


7356 032170 001406 BEQ MTPAE sBRANCH IF DONE 
7357 032172 012767 104400 177744 MOV #104400 ,MTPAL sTRAP OPCODE INTO LOCATION 
7358 032200 060367 177740 ADO R3,MTPAL sFORM TEST OPCODE 
7359 032204 000757 MTPAL sEXECUTE TEST 
7360 032206 MTPAE: 

1 
7362 032206 016767 150600 145620 MOV SLOCOO, 34 
7363 032214 016767 150574 145562 MOV SLOCO1,4 sRESTORE VECTORS 
. 364 
7365 032222 012706 001000 MOV @STBOT ,R6 
366 
7368 3 
7369 3 
7371 032226 MIOT: 
7372 
7373 ; TEST IOT TRAP 
7374 032226 012706 001000 MOV @STBOT RE sSETUP STACK 
7375 032232 016767 145562 150552 MOV 20, SLOCOO sSAVE OLD VECTOR 
7376 032240 012767 032252 145552 MOV OTB .20 sSETUP NEW IOT VECTOR 
7377 032246 000004 IOT 
7378 032250 104001 MIOTA: ERROR 1 sCPU ERROR 

sDIONT TAKE CORRECT TRAP 

7380 032252 022706 000774 MIOTB: CMP @STBOT -4,R6 sVERIFY SP DECRIMENT 
7381 032256 001401 BEQ OTO sBRANCH IF 
7382 032260 104001 ERROR 1 sCPU ERROR 
7383 sBAD PC ON STACK 
7384 032262 021627 032250 MIOTO: CMP (R6), @MIOTA -sVERFY PROPER PC ON STACK 
7385 032266 001401 BEQ MIOTF sBRANCH IF GOOD 
7386 032270 104001 ERROR +1 sCPU ERROR 
7387 INCORRECT PC ON STACK 
7388 032272 016767 150514 145520 MIOTF: MOV SLOCOO, 20 ;RESTORE VECTOR 
7308 032300 012706 001000 MOV @STBOT RE 
7393 032304 MITO: 
7394 
7395 : TEST OLD STATUS ON IOT TRAP 
7396 012706 001000 MOV @STBOT RE ;SETUP STACK 
7397 032310 016767 145504 150474 MOV 20, SL0COO sSAVE OLD VECTOR 
7396 032316 012767 032336 145474 @MIT0B , 20 3;SETUP NEW IOT VECTOR 
7399 032324 145446 CLR sCLEAR PRIORITY AND COND C 
7400 032330 000257 ccc 
7401 032332 000004 IoT 
7402 032334 104001 MITOA: ERROR 1 sCPU ERROR 
7403 sOIONT TAKE CORRECT me 
7404 032336 026727 146434 000000 MITOS: STBOT-2, sVERIFY PSW ON STACK 
7405 032344 001401 BEQ MITOC IBRANCH IF CORRECT STATUS 
7406 032346 104001 ol sCPU ERROR 
7407 sBAD STATUS ON STACK 
74086 032350 012706 001000 MITOC: MOV @STBOT ,R6 sSETUP STACK 
7409 032354 012767 032376 145436 MOV @MITOE ,20 :SET UP TRAP VECTOR 
7410 032362 012767 000357 145406 0357,PS sSET PRIORITY 
7411 032370 000277 Scc sSET CONDITION CODES 
7412 032372 000064 IOT 
7413 032374 104001 MITOD: ERROR 1 sCPU ERROR 
7414 }OIONT TAKE CORRECT T 
7415 032376 026727 146374 000357 MITOE: STBOT-2,0357 sVERIFY OLD Psu ON STACK 
7416 032404 001401 BEQ MITOF i BRANCH IF GOOD 


SEQ 0135 





Gl1 
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7417 032406 104001 ERROR +1 sCPU ERROR 
7418 s0L0 PSW INCORRECT 
MOV 
7421 032416 012706 001000 MOV #STBOT ,R6 
7422 
$ 
noe 032422 MET 
7 3 


TEST EMULATOR TRAP INSTRUCTION (EMT) 
@STBOT ,R6 


7419 032410 MITOF : | 
7420 032410 016767 150376 145402 SLOCOO,, 20 sRESTORE VECTOR 

7429 032422 012706 MOV . sSETUP STACK 

7430 032426 016767 145376 150356 MOV 30, SLOCOO sSAVE OLD 

7431 032434 012767 032470 145366 MOV ETB, 30 sSETUP NEW EMT VECTOR 
7432 032442 016767 145366 150344 MOV 34,SLO0CO1i sSAVE fRAP VECTOR 

7433 032450 012767 136104 145556 MOV @SERROR , 34 sSET UP TO HANDLE EMT ERROR 
7434 032456 104000 EMT 

7435 032460 104400 META: TRAP s TRAP ON ERROR 

7436 032462 001057 -WORD 559. 

7437 032464 000001 -WORD 1 sCPUERR 

7438 032466 000001 -WORD 1 sERRTN 

7439 sDIONT TAKE CORRECT TRAP 

7440 032470 022706 000774 METS: CMP @STBOT -4,R6 sVERIFY SP DECRIMENT 

7441 032474 001401 BEQ TO | BRANCH IF GOOD 

7442 032476 104001 ERROR +1 sCPU 

7443 :BAD PC ON STACK 

7444 032500 021627 032460 METD: CHP C(R6), OMETA ’ Y PROPER PC ON STACK 
7445 032504 001401 BEQ METF sBRANCH IF 

7446 032506 104001 ERROR +1 CPU ERROR 

7447 s INCORRECT PC ON STACK 

7448 032510 016767 150300 145316 METF: MOV SLO0Cco1, sRESTORE VECTOR 

7449 032516 016767 150270 145304 MOV SLOCOO , 30 sRESTORE VECTOR 

— 032524 012706 001000 MOV @STBOT ,R6 

7453 ; 

7455 032530 METO 

7456 

7457 3 TEST OLD STATUS ON EMT TRAP 

7456 032530 012706 000 MOV @STBOT ,R6 sSETUP STACK 

7459 032534 016767 145270 150250 MOV 30, SLOCOO sSAVE OLD VECTOR 

7460 032542 012767 032604 145260 MOV TOB , 30 sSETUP NEW EMT VECTOR 
7461 032550 016767 145260 150236 MOV 34,SL0C01 sSAVE TRAP VECTOR 

7462 032556 012767 136104 145250 MOV 6 34 SET UP TRAP VECTOR 

7463 032564 005067 145206 CLR PS sCLEAR PRIORITY AND COND C 
7464 032570 000257 ccc 

7465 032572 104000 EMT 

7466 032574 104400 METOA: TRAP 

7467 032576 001062 -WORD 562. 

7468 032600 000001 -WORD 1 sCPUERR 

7469 032602 000001 -WORD 1 sERRTN 

7470 sDIONT TAKE CORRECT TRAP 

7471 032604 026727 146166 000000 METOB: CMP STBOT-2,00 sVERIFY PSW ON STACK 

7472 032612 001401 BEQ ME TOC sBRANCH IF CORRECT STATUS 
7473 032614 104001 ERROR o1 sCPU ERROR 

7474 s3BAD STATUS ON STACK 

7475 032616 012706 001000 METOC: MOV @STBOT ,R6 sSETUP STACK 

7476 0 012767 032652 145200 MOV @METOE , 50 sSET UP TRAP VECTOR 

7477 032630 012767 000357 145140 MOV @357,PS sSET PRIORITY 





| SURSSOEcresne rer canes 
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SEQ 0137 
eeeeeeesesee DOUBLE OPERAND TESTS seecceseocscosess 
7478 032636 000277 scc sSET CONDITION CCDES 
7479 032640 104000 EMT 
7480 032642 104400 METOD: TRAP 
7481 032644 001064 . WORD 564. 
7482 032646 000001 . WORD 1 44+ 
7483 032650 000001 WORD 1 sERRTN 
TARA sOIONT TAKE CORRECT TRAP 
7485 032652 026727 146120 000357 METOE: CMP STBOT-2, 0357 sVERIFY OLD PSW ON STACK 
7486 032660 001401 BEQ ME TOF ; BRANCH IF GOOD 
7487 032662 104001 ERROR o1 sCPU ERROR 
s0LD PSW INCORRECT 
7489 032664 METOF: 
7490 032664 016767 150124 145142 MOV $L0C01,34 sRESTORE VECTOR 
7491 032672 016767 150114 145130 MOV SL0CO0, 30 sRESTORE VECTOR 
a 032700 012706 001000 MOV @STBOT .R6 
a 
7495 3 
7496 3 
7498 032704 MBT 
7499 
7500 3 TEST BPT TRAP 
7501 032704 012706 001000 MOV @STBOT ,R6 sSETUP STACK 
7502 032710 016767 145100 150074 MOV 14,SL0C00 sSAVE OLD VECTOR 
7503 032716 012767 032730 145070 MOV #eTB,14 sSETUP NEW BPT VECTOR 
7504 032724 000003 BPT 
7505 032726 104001 MBTA: ERROR o1 3CPU ERROR 
7506 sD°°NT TAKE CORRECT TRAP 
7507 032730 022706 000774 MBTB: CMP @STBOT -4,R6 3s VERIFY 4 DECRIMENT 
7508 032734 001401 BEQ MBTO sBRANCH IF GOOD 
7509 032736 104001 ERROR o1 sCPU ERROR 
7510 sBAD PC ON STACK 
7511 032740 021627 032726 MBTD: chp (R6), @MBTA sVERFY PROPER PC ON STACK 
7512 032744 001401 BEQ MBTF sBRANCH IF GOOD 
7513 032746 104001 ERROR o1 3CPU ERROR 
7514 s INCORRECT PC ON STACK 
7515 032750 016767 150036 145036 MBITF: MOV SLOCOO,14 sRESTORE VECTOR 
ea 032756 012706 001000 MOV @STBOT ,R6 
7519 3 
7522 032762 MBTO 
7523 
7524 ’ TEST OLD STATUS ON BPT TRAP 
7525 032762 012706 001000 MOV @STBOT ,R6 sSETUP STACK 
7526 032766 016767 145022 150016 MOV 14,SL0C00 sSAVE OLD VECTOR 
7527 032774 012767 033014 145012 MOV oBT0B 14 ;SETUP NEW BPT VECTOR 
7528 033002 005067 144770 CLR PS ;CLEAR PRIORITY AND COND C 
7529 033006 000257 ccc 
7530 933010 000003 BPT 
7531 033012 104001 MBTOA: ERROR +1 sCPU ERROR 
7532 sOIONT TAKE CORRECT TRAP 
7533 033014 026727 145756 000000 MBTOB: CMP STBOT-2,¢0 sVERIFY PSW ON STACK 
7534 033022 001401 BEQ MBTOC sBRANCH IF CORRECT STATUS 
7535 033024 104001 ERROR ol sCPU ERROR 
7536 3B8AD STATUS ON STACK 
7537 033026 012706 001000 MBTOC: MOV @STBOT ,R6 sSETUP STACK 


7538 033032 012767 033054 144754 MOV OMBTOE 14 sSET UP TRAP VECTOR 


yah 
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7573 
7574 033146 016767 147640 144634 HILF: MOV SLOCOO, 10 
MOV @STBOT ,R6 


3CPU ERROR 

s INCORRECT PC ON STACK 
sRESTORE VECTOR 

pe Lo 033154 012706 001000 


SEQ 0138 
aeeeceseeeee DOUBLE OPERAND TESTS seeeeecassccsccce 
7539 033040 012767 000357 144730 MOV 0357,PS sSET PRIORITY 
7540 033046 000277 scc sSET CONDITION CODES | 
7541 033050 000003 BPT 
7542 033052 104001 ERROR +1 sCPU ERROR 
7543 sDIONT TAKE CORRECT TRAP 
7544 0 026727 000357 CMP STBOT-2, 4357 sVERIFY OLD PSW ON STACK 
7545 033062 001401 BEQ MB TOF sBRANCH IF GOOD 
7546 033064 104001 ERROR 1 3;CPU ERROR 
7547 ;0LD PSW INCORRECT 
7548 033066 MBTOF : 
7549 033066 016767 147720 144720 MOV SLOCOO, 14 sRESTORE VECTOR 
Lng 033074 012706 001000 MOV @STBOT ,R6 
1 
7553 3 
be | 
7556 033100 MIL 
7558 3 TEST ILLEGAL JUMP INSTRUCTION TRAP 
7559 033100 012706 001000 MOV @STBOT ,R6 trl ST 
7560 033104 016767 144700 147700 MOV 10,SL0C00 VE OLD VECTOR 
7561 033112 012767 033126 144670 MOV @MILB.10 } SETUP NEW ILLEGAL VECTOR 
7562 033120 005001 CLR 
7563 033122 000101 JP R1 3*eTEST INSTRUCTIO 
7564 033124 104001 MILA: ERROR +1 sCPU ERROR 
7565 sOIDNT TAKE CORRECT TRAP 
7566 033126 022706 000774 MILB: CMP @STBOT -4,R6 sVERIFY SP DECRIMENT 
7567 033132 001401 BEQ MILO sBRANCH IF GOOD 
7568 033134 104001 ERROR ol sCPU ERROR 
7569 sBAD PC ON STACK 
7570 033136 021627 033124 MILO: CMP (R6), OMILA sVERFY PROPER PC ON STACK 
7571 033142 0061401 BEQ MILF 3;BRANCH IF GOOD 
7572 033144 104001 o1 

7579 033160 MILO: 

7580 

8 TEST OLD STATUS ON ILLEGAL JUMP TRAP 

7582 033160 012706 001000 MOV @STBOT .R6 sSETUP STACK 

7583 033164 016767 147620 MOV 10, SLOCOO sSAVE OLD VECTOR 

75864 033172 012767 033214 144610 MOV @MILOB , 10 tSETUP NEW ILLEGAL VECTOR 

33200 144572 CLR PS sCLEAR PRIORITY AND COND C 

7586 033204 000257 ccc 

7587 033206 005001 R1 

7588 033210 000101 R1 

7589 032212 104001 MILOA: ERROR +1 3CPU ERROR 

7590 sDIONT TAKE CORRECT TRAP 

7591 033214 026727 145556 000004 MILOB: CMP STBOT-2,04 sVERIFY PSW ON STACK 

7592 033222 001401 BEQ MILOC sBRANCH IF CORRECT STATUS 

7593 033224 104001 ERROR 1 3;CPU ERROR 
7594 38AD STATUS ON STACK 
012706 001000 MILOC: MOV @STBOT RE sSETUP STACK 
7596 033232 012767 033254 144550 MOV @MILOE ,10 3SET UP TRAP VECTOR 
7597 033240 012767 000357 144530 MOV 6357,PS sSET PRIORITY 
7596 033246 000277 scc 3SET CONDITION CODES 


7599 033250 000101 JMP R1 


631 
7632 033346 


7650 

7651 033414 
7652 033422 
Le 033424 


104001 


026727 
001401 
104001 


016767 
012706 


016767 
012706 
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145516 


147520 
001000 


145356 
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ar: $3 


MILOO: ERROR +1 sCPU ERROR 
sDIONT TAKE CORRECT TRAP 
000357 MILOE: CMP STBOT-2,0357 ;VERIFY OLD PSW ON STACK 
BEQ MILOF sBRANCH IF GOOD 
ERROR +1 ;CPU ERROR 
s0LD PSW INCORRECT 
MILOF : 
144514 MOV SLOCOO,10 sRESTORE VECTOR 
MOV @STBOT ,R6 
3 
3 
MIALL: 
3 TEST ILLEGAL JSR INSTRUCTION TRAP 
MOV P sSETUP STACK 
147500 MOV 10,SL0CO0O sSAVE OLD cT 
144470 on caret ;SETUP NEW ILLEGAL VECTOR 
JSR R3,R3 
MIALLA: ERROR +1 3CPU ERROR 
sDIONT TAKE CORRECT TRAP 
MIALLS: CMP @STBOT-4,R6 3;VERIFY SP DECR 
BEQ MIALLD sBRANCH 
ERROR +1 sCPU ERROR 
sBAD PC ON STACK 
MIALLD: CMP CR6), @MIALLA ;VERFY PROPER PC ON STACK 
BEQ MIALLF sBRANCH IF 
ERROR +1 3;CPU ERROR 
s INCORRECT PC ON STACK 
144434 MIALLF: MOV SLOCOO,10 sRESTORE VECTOR 
MOV @STBOT ,R6 
3 
3 
MJSI: 
3 TEST OLD STATUS ON ILLEGAL JSR TRAP 
MOV @STBOT .RE sSETUP STACK 
147420 MOV 10, SLOCOO sSAVE OLD VECTOR 
144410 MOV @mMJSIB,10 3SETUP NEW VECTOR 
ae PS ;CLEAR PRIORITY AND COND C 
CLR R3 
JSR R3,R3 
MJSIA: ERROR +1 :CPU ERROR 
sDIONT TAKE CORRECT TRAP 
000004 MJSIB: CMP STBOT-2, 04 sVERIFY PSW ON STACK 
BEQ MJSIC sBRANCH IF CORRECT STATUS 
ERROR +1 3;CPU E 
sBAD ons ON STACK 
MJSIC: MOV @STBOT .R6 TUP STACK 
144350 MOV @MJSIE ,10 ISET UP TRAP VECTOR 
144330 MOV @357,PS 3SET PRIORITY 
scc 3SET CONDITION CONES 
JSR R3,R3 
MJSID: ERROR +1 ;CPU ERROR 
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eeeeseceeese DOUBLE OPERAND TESTS sesecescesecseces 


016767 
012706 


016767 


145316 000357 MUJSIE: 


147320 
001000 


033532 


030000 


144174 
147214 


144314 


144224 


147200 
144164 
147166 


144112 


MJSIF : 


1$: 
2s: 


3%: 


4$: 


5%: 


ODDXxX: 


CMP 
BEQ 
ERROR 


MOV 
MOV 


STBOT-2, 0357 
MJSIF 


I/O TIME OUT TEST 
R CPE! 


Clu REG 

MOV 4,SLO0COO 

MOV 02% ,4 

MOV #30000 ,PS 
TST 80177700 
ERROR +1 

CMP @81T04 .CPEREG 
BEQ 3$ 

ERROR 1 

CMP CSP)+, 01% 
BEQ 43 

ERROR 1 

CMP (SP )+«, #30000 
BEQ S$ 

ERROR +1 

CLR CPEREG 

MOV SLOCOO 4 


sDIONT TAKE CORRECT T 
sVERIFY OLD Psu ON STACK 
GOOO 


y BRANCH IF 


sCPU ERROR 
s;0LD PSW INCORRECT 


3CPU 

CPU 
3IS THE PSW OK? 
3 

:CPU ERROR 


sRESTORE VECTOR 


CLEAR CPU — REGISTER 


HANDLE NXM 
sINIT THE PSW TO A KNOWN STATE 
ACCESS 


TOR TO 


ADDRESS 
PURPOSE REG 0. THIS 
Ts NOT IMPLEMENTED ON KDJ11 
SHOULD CAUSE TIME OUT. 
ERROR 
sIS CPU ERROR REGISTER CORRECT? 


ERROR 
sCHECK THAT STACK CONTAINS CORRECT ADOR 


sCLEAR THE CPU ERROR REGISTER 


sRESTORE VECTOR 


ODD ADDRESS/ILLEGAL INST FETCH TRAP TEST 


H 
§ SPSSSSSSSSSESSESESSESESESESESEEEESEDEEEEEESESESEESEESESEEEEEEEES 
PROGRAM GENERA 


TES AN ODD ADDRESS IN THE PC. THE KDJ11 SHOULD 


sTRAP THROUGH ADOR 4 


1%: 
2s: 


#30000, -( SP) 
@1$+1,-CSP) 


o1 

#81 T06 , CPEREG 
3% 

o1 
@1%+1,(SP)+ 


#30000, (SP )+ 


sINIT THE = ERROR REG 


sSAVE VECT 


sSET UP VECTOR TO HANDLE ODD ADOR TRAP 


sSAVE VECTOR 
sINIT VECTOR 


sPUSH A KNOWN PSW ON THE STACK 


sPUSH AN ODD NUMBER ON 


THE STACK 


sPOP ODD ADORESS OFF STACK INTO PC 
HERE 


:SHOULD TRAP 


sIS CPU ERROR REGISTER CORRECT? 


RROR 
sIS STACK CONTENTS CORRECT? 


sIS PSW CORRECT ON STACK? 
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eeeseseecece DOUBLE OPERAND TESTS eesccecacesecases 


7728 033674 001401 BEQ S$ $ 
7729 033676 104001 ERROR +1 ;CPU ERROR 
7730 033700 005067 144062 S$: CLR CPEREG sCLEAR CPU ERROR REG 
7731 3 
7732 sNOW WE'LL TRY TO FETCH AN INSTRUCTION FROM AN INTERNAL REGISTER. 
7733 :THIS SHOULO CAUSE A TRAP TO ADDR 4 AND SET BIT 6 IN THE CPU 
7734 sERROR REGISTER. 
7735 
7736 033704 012767 033732 144072 MOV 07% ,4 sLOAD VECTOR WITH TRAP HANDLER ADOR 
7737 033712 012767 030340 144066 MOV @30340,6 sLOAD VEC WITH PSW VALUE ON TRAP 
7738 033720 7 144052 CLR PS s;CLEAR THE PSW 
7739 033724 000167 144046 JP PS seeeseseTEST INSTRUCTIONeseseses 
7740 sTRY INSTRUCTION FETCH FROM INTERNAL 
7741 sREGISTER-- SHOULD TRAP VIA ADOR 4 
7742 033730 6%: ERROR + ;CPU ERROR 
7743 033732 016701 144040 78: MOV PS, sSAVE CONTENTS OF PSW IN R1 
7744 033736 022767 000100 144022 CMP @68IT06 , CPEREG sIS CPU ERROR REGISTER CORRECT? 
7745 033744 001401 BEQ 3 
7746 033746 104001 ERROR ;CPU ERROR 
7747 033750 022726 177776 8$: CMP @PS CSP )+ 3IS STACK CONTENTS CORRECT? 
7748 033754 001401 BEQ 9% 3 
7749 033756 104001 ERROR 1 ;CPU ERROR 
7750 033760 022726 000000 9%: CMP @0,(SP)-« sIS STACK CONTENTS CORRECT? 
7751 033764 001401 BEQ 10% 3 
7 033766 104001 ERROR 1 ;CPU ERROR 
7753 033770 022701 000340 10$: CMP 0340,R1 sWAS PSW LOADED PROPERLY ON TRAP? 
7754 033774 001401 BEQ 11% 3 
7755 033776 104001 ERROR 1 ;CPU ERROR 
034000 005067 143762 118: CLR CPEREG ;CLEAR CPU ERROR REGISTER 
7757 034004 016767 147002 143772 MOV SLOCOO.4 sRESTORE VECTOR 
pee 034012 016767 146776 143766 MOV S$L0C01.6 3 * 
7762 034020 RXXX: 
7763 
7764 ; RED ZONE TRAP TEST 
7765 034020 013767 000004 146764 MOV 904 ,SLOCOO sSAVE VECTOR 
7766 034026 012737 034056 000004 MOV 02% , 804 :SET UP VECTOR 
7767 034034 012706 000777 MOV 0777 ,R6 3SET UP THE STACK WITH ODD ADORESS 
7768 034040 005067 143722 CLR sCLEAR THE CPU ERROR REGISTER 
7769 034044 005067 143726 CLR PSwW ;CLEAR THE PSw 
7770 034050 005737 177700 TST 80177700 sACCESS NON-EXISTANT I/0 ADORESS 
7771 034054 104001 1%: +1 :CPU ERROR 
7772 034056 022706 000000 2s: #0, SP sIS R6 CORRECT? 
7773 034062 001401 BEQ 3% sBRANCH IF YES 
7774 034064 104001 ERROR 1 3CPU ERROR 
7775 034066 022726 034054 3%: CMP #1¢,(SP)-+ sIS DATA AT ADOR O CORRECT? 
7776 034072 001401 BEQ a s;BRANCH IF YES 
7777 034074 104001 ERROR + ;CPU ERROR 
7778 034076 022716 000000 4%: CMP #0, (SP) 3IS PSw _ IN ADOR 2 CORRECT? 
7779 034102 001401 BEQ 5 sBRANCH IF YES 
7780 034104 104001 ERROR 1 ;CPU ERROR 
7781 034106 022767 000124 143652 5%: CMP #124 , CPEREG 1IS CPU ERROR REGISTER CORRECT? 
7762 034114 001401 BEQ 63 sBRANCH IF YES 
7783 034116 104001 ERROR 1 sCPU ERROR 
7764 034120 005067 143642 6%: CLR CPEREG :CLEAR CPU ERROR REGISTER 
7785 034124 012706 001000 MOV @STBOT,SP sRESTORE STACK 
7786 034130 016737 146656 000004 MOV SLOCOO , 804 sRESTORE VECTOR 


M11 
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eecceeseeees DOUBLE OPERAND TESTS seccesesesesesess 


7787 034136 
7788 034142 


005637 
005037 


034304 


177772 
177772 


177772 
177772 


146636 
143622 


143604 


146574 


PIRXXX: 
$ 


PIRQNX : 
PIRTEX: 


PIR1: 
F 


1%: 


2s: 


PIRTBL: 


EXPIR1: 


CLR 
CLR 


300 
ae 


TEST PIRG ae RESPONSE 


j Bente 


LS 


Beg 


sRESTORE ADOR 0 
sRESTORE ADOR 2 


. SLOC sSAVE CONTENTS OF VECTORS 
@P IRQNX , 4 sSETUP INTERRUPT VECT 
CPEREG sCLEAR CPU ERROR REGISTER 
BeP IRQ sLOOK FOR REPLY FROM PIRG 
SLOCOO,4 ;RESTORE VECTORS 
PIRTEX sIF IT RESPONDS, CONTINUE TESTING. 

;ERROR! NO RESPONSE FROM PIRG REG 

o1 ;CPU ERROR 


IRQVEC, _ PIRQ VECTORS 
SOP IRQVEC+2,SL0C01 
.90P :SET UP PIRG VECTOR FOR UNEXPECTED INTERRUPT 

@PR7 , BOPIRQVEC +2 

#1000 ,R3 ;PuT 1000 IN R3: START TESTING 
sBITS IN PIRG REG BY FLOATING 
sA BIT roy ge BITS pat 

@PIRTBL .R4 sSET UP R4 AS A O EXPECTED 
sENCODED PRIORITY LEVELS. IN PIRTBL 

7 sD0N‘'T ALL 

IRQ CLEAR OUT THE PIRG 

BEPIRG, (R4)- sIS PIRQ OK?? 

2s s6R IF OK 
sERROR; PIRQ REG WAS NOT CLEAR 

+1 ;CPU ERROR 

R3, BOP IRQ sSET A BIT IN PIRQG REGISTER 

BEPIRG,(R4)> sCOMPARE THE ENCODED PRIORITY BITS 
sWITH DATA IN — TABLE (PIRTBL ) 

3$ sBRANCH IF ITS OK 
sERROR; ENCODED PRIORITY LEVELS ARE 
iNOT CORRECT 

+1 ;CPU ERROR 

R3 sFLOAT A “1” THRU BITS 9-15 

2s sIF CARRY BIT ISN'T SET, DO AGAIN. 

EXPIR1 :GO TO EXIT TEST. 

0 

1042 

2104 

4146 

10210 

20252 

40314 

100356 


7855 034324 
S6 
7857 


023724 


COKMACO KDJ11-B CLUSTER DIAG. 
eeesesescese DOUBLE OPERAND TESTS seseeeesesasesese 


177772 
000001 
177000 
034410 
177772 
177772 
003030 


000777 
003030 


077314 
007146 
000000 


001000 
034502 
000340 


177772 


177772 


N11 
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146470 


037252 
003104 


000240 
000242 


SEQ 0143 
PIR2: 
: TEST PIRQ REGISTER LEVEL ENCODING 
j OMOSCOSSESESSSESEEESESESESEEEEREEEEEESEEESEESEEDEEEEEEEEEEEEEES 
;THIS TEST IS TO CHECK THAT THE HIGHEST PRIORITY LEVEL SET IN THE 
;PROGRAM INTERRUPT REQUEST BITS IS REFLECTED IN THE ENCODED PROGRAM 
V INTERRUPT cig BITS. 
SPL sSHUT OFF INTERRUPTS 
CLR eertre sCLEAR PIRQ REGISTER 
MOV #1,FLAG SETUP OF Lu 
MOV #177000 ,R3 sSET UP DESIRED PATTERN IN R3 
MOV @PITBL1,R4 sSETUP R4 AS A TABLE POINTER 
1%: MOV R3, BOP IRQ sSET PATERN IN PIRQ REGISTER 
CMP BOPIRG,(CR4)> sCOMPARE PATTERN IN PIRQ WITH PATTERN IN 
sEXPECTED PATTERN TABLE. 
BNE 2s :GO TO ERROR IF NOT THE SAME 
TST QOF LAG sIS THIS THE LAST TIME THROUGH?? 
BEQ PIR2EX sYES, IF FLAG IS ZERO 
ROR R3 SSHIFT PATTERN TO RIGHT FOR NEXT TEST 
BIC @777,R3 sSTRIP OFF BITS 8-0 
BNE is sIF R3 IS NOT = O GO OO THE NEXT PATTERN 
CLR QF LAG ;CLR THE FLAG TO INDICATE LAST 
;TIME THROUGH THE 
BR 1s :GO THROUGH LOOP ONCE MORE 
;ERROR; PATTERNS WERE NOT THE SAME 
2s: ERROR +1 ;CPU ERROR 
PITBL1: .WORD 177356,77314,37252,17210, 7146, 3104,1042,0 
UNXPIR : ; UNEXPECTED PIRQ INTERRUPT 
ERROR +1 ;CPU ERROR 
PIR2EX: 
PIRS: 
3 TEST PIRQ@ INTERRUPTS 
s POSSESS SSSSSSSSESSEESESSERSESEEEESEEEESEEEEEESESEEEESEEEEEEEEES 
;THIS TEST CHECKS THAT EACH PROGRAM INTERRUPT OCCURS PROPERLY 
MOV #1000 ,R3 sSETUP R3 AS A WORKING REGISTER 
MOV @PIRRTN, @ePIRQVEC 1SET UP INT ERRUPT ROUT INE AT PIP VECTOR 
MOV 0340, @ePIRQVEC+2 
CLR R4 HINITIALIZE Ra As EXPECTED DATA HOLDER. 
PI1: TST (R4)> R4 BY 2 
6IS R3, BOP IRQ SET PIRG. TO INTERRUPT 
SPL te) ;ENABLE INTERRUPT TO OCCUR 
;ERROR! INTERRUPT DID NOT OCCUR 
ERROR +1 ;CPU ERROR 
sERROR! INTERRUPT OCCURRED IN WRONG SEQUENCE 
PI2: ERROR +1 ;CPU ERROR 
PIS: ADD 04, SP ;CLEAN UP THE STACK 
ASL RS ;SHIFT R3 TO LEFT FOR — INTERRUPT 
BCC PI1i s;END IF CARRY BIT IS SE 
BR PIR3EX 30N TO THE NEXT TEST 


PIRRTN: MOV GOP IRG,RS sMOVE THE CONTENTS OF PIRQ REG TO RS 
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eececeeesese DOUBLE OPERAND TESTS eecccecssscossess 


7913 034506 


103374 
005037 
000403 
005037 


104001 


005724 
010337 
013701 
013702 


177772 
177761 


177742 


177772 
177776 


001000 
034576 


000340 
177772 
177772 


177772 


177772 
034722 


177772 


177776 
177772 


Blo 
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111460 


CLR @eP IRQ sKILL PIRQ INTERRUPT. 
BIC #177761,R5 sMASK OFF ALL BITS EXCEPT 1-4. 
CMP R4 RS 1010 THE CORRECT LEVEL INTERRUPT OCCUR? 
BNE PI2 sIF NOT; GO TO ERROR. 
JP PI3 sRETURN FROM yt INTERRUPT ,GET 
sREADY FOR THE NEXT ONE. 
PIRSEX. 
PIR4; 
3 TEST PIRQ VS PSW INTERRUPT LEVEL 


8 J SOSSSSSSSSSSSSSSSSSHSSSSSSSSHSSHSSSSSHSSSSSSSOSSSSSSSSESSEHSSESEEEESD 


sTHIS TEST IS TO ENSURE THAT a CANNOT INTERRUPT WHEN PSW INTERRUPT 
sLEVEL IS SET TO BLOCK THEM 
CLR GeP IRQ sCLEAR THE PIRG 
CLEAR 


Q r TME PSW. 
SPL 7 s8LOCK INTERRUPTS FROM BEING SERVICED. 
MOV #1000 ,R3 sUSE R3 AS A WORKING REGISTER. 
MOV 02¢ , BOP IRQVEC sSETUP INTERRUPT VECTORS 
MOV 0340 , BOPIRQVEC +2 $ 
1%: MOV R3, BPIRA sSET arcu LEVEL IN PIRQ. 
@SL RS sSHIFT A “1° LEFT TO INCREASE INTERRUPT 
sPRIORITY LEVEL. 
ecc 1% sIF C BIT NOT SET THEN DO IT AGAIN. 
CLR Bee (RG sELSE CLEAR THE PIRG 
6R Ry) tEXIT TEST. 
2s: CLR @ePIRQ sSTOP PIRQ FROM INTERRUPTING. 
s;ERROR! NO INTERRUPTS SHOULD OCCUR. 
- ERROR ol 3sCPU ERROR 


PIRS: 

3 TEST PIRQ INTERRUPTS OCCUR AT PROPER LEVEL 

§ FOSSRHSSSSSSSSSSESSESSESSESEESEEEESSEEEESESEEEOEOSESOOEESESEEEES 

sTHIS JEST ENSURES THAT INTERRUPT aT LEVEL 

3 THE PRIORITY LEVEL IS INITIALLY SET TO PRIG6. THE PIRQ THEN STARTS INTERRUPTING 
sat PRI1. NO INTERRUPTS SHOULD OCCUR UNTIL THE INTERRUPTING LEVEL EXCEEDS he | 
sPRIORITY LEVEL Be AFTER EACH LEVEL OF INTERRUPT HAS BEEN TRIED; THE 

sPSW PRIORI NOTCH, AND THE CYCLE REPEATS UNTIL PSW 
SPRIORITY Level, 01s REACHED. INTERRUPTS AT PSW PRIORITY LEVEL O HAVE BEEN DONE 


sPREVI 
Me BPILG sCLR THE PIRO 
Ov 0108 , BePIRQVEC ~— UWP INTERRUPT VECTORS 
MOV @PR7 , BOPIRQVEC -2 
mov oPITAL2 RS ) SETUP RS AS A TABLE PUINTER. 
MOV 06 , BEOCOUNT sINIT LOCATION OCOUNT: 
16: CLR R4 mY me oe R4 AS A COUNTER. 
Ov #1000 ,R3 2USE R3 AS A WORKING REGISTER. 
MOV (RS)+ PS sMOVE ne hy LEVEL TO PSW 
36: TST (R4)> s INCREMENT R4 BY 2 
MOV R3, BOP IRO iSET INTERRUPT LEVEL IN PIRQ. 
peoeceocceINTERRUPTS WILL HAPPEN HERE cecececes 
S,R1 


MOV ers, sSAVE PS IN Ri !ONLY EXECUTED 
MOV BOP TRG ,R2 sSAVE PIRQ IN R2 ! IF NO 


SEQ 0144 


Cle 
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ecececeecese DOUBLE OPERAND TESTS cecccceseesocesss 


7962 0 


7963 


7987 


34666 
034672 
346 76 
034 700 


177437 
177437 


111460 
000072 


177772 
177772 
000004 


177437 
177437 


177761 


034704 


SEQ 0145 


BIC @177437,R1 sCLEAR EXTRANEOUS BITS ! INTERRUPT 

BIC 0177437 ,R2 3 $ HAS 

chp R1,R2 sR1 SHOULD BE >= R2 : OCCURRED 

BGE as sIF IT IS GOON =~ _—_$--«-«--- 
sERROR! SHOULD HAVE INTERRUPTED. 

ERROR +1 sCPU ERROR 

4%; ASL RS sSHIFT A “1” LEFT UNTIL INTERRUPT LEVEL 

sIS REACHED. 

ecc 38 sBRANCH BACK IF CARRY IS NOT SET. 

DEC SeOCOUNT sLOWER + nae iy PRIORITY LEVEL 

BNE is IF OCOUNT = WE'RE DONE. 

JP PIRSEX sJUMP TO ENO OF THIS TEST. 


sPIRQ INTERRUPT SERVICE ROUTINE 
; 


108: MOV BePIRG, -( SP) sSAVE PIRG DATA ON ona 
PIRG INTERRUPTS 


CLR BeF TRO sSHUT OFF 

MOV 4(SP),R1 :GET OLD PSW. SAVE IN R1. 

MOV (SP) ,R2 ;GET PIRG FROM STACK. 

BIC 177437 ,R2 sCLEAR UNMANTED BITS FROM R2 

BIC 0177437,R1 sCLEAR UNMANTED BITS FROM R1 

R1,R2 sR2 SHOULD BE > Ri. 

BMI 20% 3G0 CHECK SEQUENCE OF INTERRUPT. 
sERROR! PRIORITY OF INTERRUPT WAS NOT 
sHIGH ENOUGH. SHOULDN'T HAVE OCCURRED. 

ERROR ol 3;CPL' ERROR 

208: MOV (SP)«,R2 sPOP OLD PIRQ OFF THE STACK. 

BIC #177761 ,R2 sCLEAR OFF EXTRANEOUS BITS. 

CMP R4 ,R2 sSHOULD BE EQUAL. 

BEQ 21% 3IF THEY ARE EQUAL, CLEAN UP STACK AND 
ee FOR THE NEXT INTERRUPT 
Q 
sERROR! INTERRUPT OCCURRED OUT OF SEQUENCE. 

ERROR ol sCPU ERROR 

21%: MOV @4¢,(SP) sPUT RETURN ADORESS ON THE STACK. 

RTI sRETURN FROM INTERRUPT. RESTORE PSW. 

PITBL2: .WORD 300 sPRIORITY LEVEL 6 

-WORD 240 sPRIORITY LEVEL 5 

-WORD 200 sPRIORITY LEVEL 4 

.WORD 140 sPRIORITY LEVEL 3 

-WORD 100 sPRIORITY LEVEL 2 

. WORD sPRIORITY LEVEL 1 

PIRSEX: 
PIRGE: 
3 TEST THAT PIRG@S ARE SERVICED IN CORRECT ORDER 


$ J SSOHSSSSSSSSHSSSSSSSSSSSSSSSHSSSSSSSSSSSHSSSSHSSHSHSHLSHSHSHHES 


sTHIS TEST CHECKS THAT ALL PIRQ INTERRUPTS ARE SERVICE 
IN THE CORRECT DECENDING ORDER 


sBEFORE IRG7 ETC. THE PIRG IS LOADED WITH INTERRUPTS SIMUL TANEOUSLY 
5 . THE ‘SW PRIORITY LEVEL IS THEN LOWERED TO 0. EACH INTERRUP 
s SHOULD TILED . EACH TIME INTERRUPT OCCURRS, THE PSW 


-— --———-- — + —- --  - - 


8104 
6105 035216 


016737 
016737 


COKDACO KDJ11-8 CLUSTER DIAG. 
eesceeeeceee DOUBLE OPERAND TESTS eecccccsecesoseses 


177772 


177772 
177761 


000777 
177772 


145670 
145664 


Die 
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SEQ 0146 
sAFTER A COPRECT INTERRUPT, AN RTI IS EXECUTED, AND THE PSW PRIORITY LEVEL 
sRETRUNS TO ZERO ALLOWING THE NEXT LOWER INTERRUPT TO OCCUR. 
CLR Ber TRG sCLEAR OUT THE PIROG 
SPL 7 sNO INTERRUPTS WILL BE SERVICED. 
000249 MOV #106 , B@PIRQVEC sSET UP VECTORS 
000242 MOV @PR7 , BOPIRQVEC +2 ’ 
MOV #177000 ,R3 tSETUP DESIRED PATTERN IN R3 
MOV RS, BeP IRQ | MOVE PATTERN = R3 TO PIRG. 
MOV ets. Ra sPRELOAD R4 AS A DECREMENTING COUNTER. 
SPL LET THE prRG INTERRUPT 
jseeneense INTERRUPTS OCCUR HERE! ! !esccscccsconseseses 
sIS R4 ZERO? IT SHOULD BE. 
s INSTRUCTION SHOULDN'T BE EXECUTED 
sUNTIL ALL INTERRUPTS HAVE OCCURRED. 
BEQ PIRGEX 3GO TO NEXT TEST. 
sERROR! ALI. INTERRUPTS DID NOT OCCUR. 
ERROR +1 sCPU ERROR 
108: MOV BePIRQ,R2 sSAVE THE PIRQ IN R2 
BIC @177761,R2 sSTRIP OFF EXTRANEOUS BITS. 
chp R4 ,R2 sSHOULD SE EQUAL. 
BEQ 15% sSETUP FOR NEXT INTERRUPT. 
sERROR! INTERRUPT WAS SERVICED OUT OF ORDER 
ERROR +1 :CPU ERROR 
158; TST -(R4) sDECREMENT R4 BY 2 
ROR R3 | CHANGE PATTERN IN R3; LOWER INTERRUPT PRIORITY 
BIC 0777 ,R3 sSTRIP OFF T 
Ho R3, BeP IRQ sLOWER INTERRUPT PRIORITY LEVEL. 
’ 
000240 PIRGEX: MOV SLOCOO , BOP IRQVEC sRESTORE VECTORS 
000242 MOV SLOCO1 , BOP IRQVEC +2 3 . 
‘ 
.SBTTL MEMORY MANAGEMENT TESTS | 
$ COSSSSOSSESSESSESSESSSESSSTESSSESSSEESSESSSESESESEESEEESESEEESSESEEESEEESS 
‘eemeenemeed 1-1." Ciaceeneemamrmnnnnnn 
BEGIN few TESTING 
| Ooccccnccccccsoooocooscceoooeeseooconeseecooeeesssseeoeeceseeeeoesceeeeees 
pOCCOCOSSSSESOSSSSSESSSESSSSESSSSESSSSEESSEESESEESESSOESESESEESEEELEOESEESEE 
SPU 1: 
s STATUS REGISTER TEST 
CLR CPEREG sCLEAR CPU ERROR REGISTER 
CLR 90177572 3 TURN MMU OFF 
CLR et AG s;CLEAR My TRAP FLAG 
mov 804, -(SP) sSAVE OLD VECTOR 
000004 MOV @ADOTRP , 804 sSETUP NEW VECTOR 
CLR RS sCLEAR FLAG 
MOV @0177572,R1 s TEST MMRO 
MOV 90177574 ,R1 3: TEST MARI 
MOV @0177576,R1 s TEST MAR? 
MOV 80172516,R1 3; TEST MAR 
mov (SP )+, 804 sRESTORE VECTOR 
chp ‘ s0ID WE TRAP 
BEQ 1$ 3NO, THEN BRANCH 
ERROR +2 sMMU ERROR 
18 sYES, GO TO ERROR | 


ee Eo 


8108 035216 
8109 
6110 035216 


003052 


18: 


2s: 


3%: 


21%: 


223: 
4$: 


5%: 


E12 


90177572 


(R4), 03% 
226 

*2 

= cea 


R2,CR4)> 
Ri 

R4, 0172400 
4s 

#177600 ,R4 
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MEMORY MANAGEMENT TESTS 


SEQ 0147 


ADDRESS TEST OF PARS,PDORS, AND FP REGS 
LR CPEREG 


sCLEAR CPU ERROR REGISTER 


su OFF 
sCLEAR MMU TRAP FLAG 
;SAVE FP VECTOR 


sSAVE TIME OUT VECTOR 
sSETUP NEW FP VECTOR 


H 

sSETUP NEW TIME OUT VECTOR 

sCLEAR TIMEOUT FLAG 

sLOAD ALL PARS AND PORS WITH ZERO 
3 


| 
| 
| 
| 
LOAD ACO-ACS WITH O 


oe es @+ Gf Ge Ge GF Gf Ge GF Ge GF Ge Ge Ge Ge “6 GF Ge 


sLOAD FEC WITH 4 AND FEA WITH 03% 
s;CHECK FEC FOR 4 AND FEA FOR 03% 
“ 


; 
sm ERROR 
‘ 


: 
sCHECK EACH PAR, POR FOR O THEN 
sWRITE A UNIQUE NUMBER TO IT 


: 
34MU ERROR 


Fig 
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MEMORY MANAGEMENT TESTS 


8165 035460 
8166 035462 
35466 


6%: 


7$: 


9%: 


10$: 


12%: 


13%: 


14%: 


15%: 


SEQ 0148 
R1,R2 3 
#10,R2 3 
(R4),00 $ 
7% 3 
+2 3;MMU ERROR 
5 
R2,(R4)> 3 
R1 3 
ee 3 
4 $ 
oFLO,R4 sCHECK ACS FOR ALL ZEROES THEN LOAD A 6 
@FLOAT ,R3 3 
ACO, (R4) 3 
5,ACO 3 
ACO,C(R3) 3 
R2 _ 
yen 3 
é 
+2 3MMU ERROR 
rf 
Re 3 
8s A 
@FLOAT ,R3 3 
#6,(R3) 3 
CR3),ALO 3 
ACS $ 
AC4,ACO ;CHECK AC4 FOR ALL ZEROES THEN LOAD A 5 
ACO,(R3) 3 
R2 é 
CR3)+,00 3 
11$ : 
2 3MMU ERROR 
& 
R2 3 
10% : 
#5,(R3) 3 
(R35),ACO 3 
ACO, AC4 $ 
04 ,R2 3;CHECK ACO FOR ALL ZEROES THEN LOAD A 1 
(R4)+, 00 3 
13% 3 
+2 3MMU ERRCR 
4 
Re 3 
12% ’ 
#1,(R3) F 
(R3),ACO 3 
A pe ;CHECK AC1 FOR ALL ZEROES THEN LOAD A 2 
. ; 
AC1,(R4) 3 
(R4)+,00 : 
15% 3 
+2 3MMU ERROR 
3 
R2 ; 
14% $ 


G12 
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3EQ@ 0149 
MEMORY MANAGEMENT TESTS 
8222 035676 012713 000002 MOV #2,(R3) ‘ 
6223 035702 172515 LOO (R3),AC1 ; 
035704 012704 003062 MOV @FLO,R4 sCHECK AC2 FOR ALL ZEROES THEN LOAD A 3 
8225 035710 012702 000004 MOV »R2 ; 
6226 035714 174214 STO AC2,(R4) ’ 
86227 035716 022427 000000 16$: CMP CR4)+,00 : 
8226 035722 001401 BEQ 17% 3 
86229 035724 1 ERROR +2 sMMU ERROR 
‘ 
6231 035726 905302 17%: DEC Re F 
86232 035730 001572 BNE 16% 
6233 035732 0127135 000005 MOV #3,(R3) : 
6234 035736 172615 LOO (R3),AC2 ; 
8235 035740 012704 003062 MOV oFLO,R sCHECK ACS FOR ALL ZEROES THEN LOAD A 4 
6236 035744 012702 000004 MOV #4 ,R2 $ 
6237 O3S7S50 174314 STO ACS, (R4) i 
6238 035752 000000 18%: chp C(R4)+, 00 3 
6239 035756 001401 BEQ 19% 3 
6240 035760 104002 +2 sMMU ERROR 
‘ 
035 198: DEC R2 ; 
8243 035764 001572 BNE 18% ; 
012713 000004 MOV #4,(R3) ‘ 
6245 035772 172713 LODO CR3),ACS H 
8246 035774 012 003062 MOV @FLO,R4 sCHECK FPS FOR 100204 THEN LOAD IT WITH 200 
7 036000 170214 STFPS (R4) ’ 
036002 022714 100204 CMP #100204 , (R4) $ 
6249 036006 00140) BEQ 20% ; 
ring 036010 104002 +2 MMU ERROR 
: 
6252 036012 170127 20%: LOFPS 3 
8253 036016 012704 172200 MOV #172200 ,R4 s;CHECK POR, PAR FOR UNIQUE NUMBERS 
8254 036022 012701 000001 MOV #1,R1 ; 
8255 0 010102 23%: MOV R1,R2 ; 
8256 036030 072227 000010 ASH #10,R2 ; 
6257 036034 CMP (R4)+,R2 ‘ 
6258 036036 001401 BEQ 24s ; 
6259 0 104002 ERROR +2 sMMU ERROR 
8260 ; 
8261 036042 005201 24%: INC H 
036044 020427 172400 CMP R4, #172400 : 
6263 036050 001366 BNE ; 
8264 036052 012704 177600 MOV #177600 ,R4 ; 
8265 036056 010102 25%: MOV R1,R2 5 
036060 072227 000010 ASH #10,R2 ; 
8267 936064 chp (R4)+,R2 : 
8268 036066 001401 BEQ 26% ; 
oi 036070 1 ERROR +2 sMMU ERROR 
: 
6271 036072 005201 26%: INC ; 
8272 036074 020427 177700 CMP R4, 0177700 H 
8273 036100 001366 BNE $ 3 
6274 036102 012701 003052 MOV FLOAT ,R1 sCHECK ACS FOR 06 
8275 036106 012704 003062 MOV @FLO,R4 ; 
6276 036112 174014 STO ACO, (R4) ’ 
6277 036114 172405 LOO 5. ; 
6276 036116 174011 sto ACO,(R1) ; 


8279 036120 


8330 036304 
8331 036310 
8332 036312 
6333 


6334 036314 
8335 036320 


022127 
001401 
104002 


012703 
022127 


012703 
022127 


000006 


000003 


000003 


000003 


31%: 


39%: 
40%: 
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(R1)+, 06 
27% 
+2 


@3,R3 
(R1)+,@0 
29% 


+2 


34t 
@FLOAT,R1 
AC1,(R1) 
(R1)+,02 
36% 

+2 


@3,R5 
(R1)+,00 
38% 


2 


@3,R5 
(R1)+, 00 


H1l2 
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3 
3;MMU ERROR 
$ 

8 


: 
;CHECK ACO FOR @1 


; 
sMMU ERROR 
; 

; 

; 


H 
sMMU ERROR 
3 

H 


3 
sCHECK AC1 FOR #2 
; 
: 


3 
3MMU ERROR 
F 


’ 
3 
3 
3;MMU ERROR 
: 
: 


; 
sCHECK AC2 FOR 03 
; 
: 


’ 
3MMU ERROR 
’ 

: 

: 


SEQ 0150 


MEMORY MANAGEMENT TESTS 


003052 


000003 


177572 
003030 
172200 
177777 
172400 
177600 


177777 
177700 


172200 
177416 


172240 
177777 


172300 
177416 


172340 


41%: 


4: 


7: 


WRITE 
R 


Re Z53K% Z5tK% ZERSRIeSRIEEEE 


ALL PARS. 


T12 | 
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(SP )+, 80244 


90177572 
SOFLAG 


#172200,R3 

©. 77777, CRE Do 
_ #172400 

1 

#177600 ,R3 
#177777, CR3)« 
aeareree 


2 
#172200 ,R3 
aoe . 0177416 


2 

> alee 
(R3)+, 0177777 
6% 

2 

oe 
(R3)+, 0177416 
8s 

+2 

R3, 0172340 

7% 


; 
sMMU ERROR 
‘ 

. 


;CHECK AC3 FOR 04 
3 
: 


$ 
sMMU ERROR 
8 

8 

3 


; 
sMMU ERROR 
; 

; 


a 
sIS TIME OUT FLAG O 
GO ON 


j 

sNO GO TO ERROR 
sRESTORE TIME OUT VECTOR 
sRESTORE FP VECTOR 
: 


‘aaa WITH ONES THEN ZEROS 


sMMU OFF 

;CLEAR MMU ABORT FLAG 

;LOAD ALL PARS AND PORS WITH ONES 
3 


CHECK SPDRS FOR ONES 


3 
3MMU ERROR 
’ 

3 


i CHECK SPARS FOR ONES 
sou ERROR 
; 

CHECK KPORS FOR ONES 


F 
3MMU ERROR 





eee F 
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| 
| 
MEMORY MANAGEMENT TESTS 
8395 036540 022327 177777 9%: CMP (R3)+,0177777 ;CHECK KPARS FOR ONES 
8396 036544 001401 BEQ 10% ; 
aoe 036546 1 ERROR 2 3;MMU ERROR 
8 a 
6399 036550 020327 172400 10$: CMP R3, 0172400 : 
6400 036554 001371 BNE 9% ; 
8401 036556 012703 177600 MOV #177600 ,R3 sCHECK UPDRS FOR ONES 
6402 036562 022327 177416 11%: CMP (R3)+, 0177416 ; 
$403 036566 001401 BEQ 12% : 
8404 036570 104002 ERROR 2 sMMU ERROR 
Hy 
8406 036572 7 177640 12$: CMP R3, 0177640 : 
8407 036576 001371 BNE 11% ; 
022327 177777 13%: CMP CR3)¢,0177777 ;CHECK UPARS FOR ONES 
8409 036604 001401 BEQ 14% 3 
8410 036606 104002 ERROR oe 3;MMU ERROR 
3 
6412 036610 020327 177700 14%: CMP R3, #177700 3 
6413 036614 001371 BNE 3$ H 
6414 036616 012703 172200 MOV #172200,R3 sLOAD ALL PARS AND PORS WITH ZEROES 
8415 036622 012723 000000 158: MOV @0,CR3)+ F 
8416 036626 020327 172400 CMP R3, 0172400 H 
8417 036632 001573 BNE H 
6418 036634 012703 177600 MOV #177600 ,R3 3 
8419 036640 012723 000000 16%: MOV #0,(R3)+ ; 
036644 020327 177700 CMP R3, 0177700 3 
8421 036650 001373 BNE 3 
8422 036652 012703 172200 MOV #172200 ,R3 ;CHECK ALL PARS AND PDRS FOR ZEROES 
8423 036656 022327 000000 17%: CMP CR3)+, 80 3 
0 001401 BEQ 18% 3 
8425 036664 1 ERROR 2 3sMMU ERROR 
Fy 
8427 036666 020327 172400 18%: CMP R3, 0172400 3 
8426 036672 001371 BNE 17% F 
8429 036674 012703 177600 MOV #177300,R3 3 
8430 036700 022327 19%: CMP (R3)+,00 F 
6431 036704 001401 BEQ 20$ F 
orf 036706 104002 ERROR +2 3sMMU ERROR 
3 
8434 036710 020327 177700 20%: CMP R3,0177700 3 
oa 036714 001371 BNE 19% F 
8439 036716 TSMMU4 ; 
8440 3 TEST FOR ADJACENT SHORTS IN PARS/PORS 
6441 036716 005037 177572 CLR 80177572 sMMU OFF 
6442 036722 005067 144102 CLR FLAG sCLEAR MMU ABORT FLAG 
8443 036726 012700 172200 MOV #172200 ,RO sLOAD SPDRS WITH ALTERNATING PATTERN 
8444 036732 012720 1%: MOV #52404 ,(RO)>+ 3 
6445 036736 012720 125012 MOV #12501z,(RO)>+ F 
8446 036742 7 172240 CMP RO, #172240 3 
8447 036746 001371 BNE 18 F 
036 012720 125252 2%: MOV #125252 ,(RO)-+ ;LOAD SPARS WITH ALTERNATING PATTERN 
8449 036754 012720 052525 MOV #52525 ,(RO)+ : 
8450 036760 172300 CMP RO, #172300 3 
8451 036764 001371 BNE 3 
8452 036766 012720 052404 3%: MOV 052404 ,(RO)>+ ;LOAD KPORS WITH ALTERNATING PATTERN 
8453 036772 012720 125012 MOV #125012,(RO)> 3 
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MEMORY MANAGEMENT TESTS 


6454 036776 
8455 037002 


8456 037004 
8457 037010 


8472 037072 
6473 037074 
BATK 

8475 037076 


96 
8499 037162 
8500 037166 
8501 037170 
8502 037174 
6503 037176 104002 
8504 


6505 037200 
8506 037204 
8507 037206 


8509 037210 020327 
8510 037214 


172340 


172400 


43; 


5$: 


10%: 


33 958 g53h3 g53 9538 PEeEEE CELL EELS F 


3 35 


ns 4. 
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RO, 0172340 
3$ 


#52404 
#125012 ,(RO)+ 
> emcee 


$ 
#125252 ,(RO)>+ 
#52525, (RO)+ 
RO, #177700 
6$ 
#172200,R3 
C(R3)+, 052404 
8% 

+2 
(R3)+, #125012 
9s 

*2 
~~ 
(R3)+, 0125252 
11% 

2 
(R3)+, 052525 
12% 

+2 
R3,0172300 
10% 
CR3)+, #52404 
14% 

2 
(R3)+, 0125012 
15% 

2 
R3, 0172340 
13% 
(R3)+, 0125252 
17% 

2 
(R3)+, 052525 
18% 

+2 
R3, 0172400 
16% 


SE@ 0153 


3 
sLOAD KPARS WITH ALTERNATING PATTERN 
° 
; 


° 
sLOAD UPDRS WITH ALTERNATING PATTERN 
3 
i 
3 


3 
sLOAD UPARS WITH ALTERNATING PATTERN 
3 
6 
e 


sCHECK SPDRS 
; 


; 
sMMU ERROR 
3 

: 


i 
sMMU ERROR 
; 

3 


4 
s;CHECK SPARS 


3 
3MMU ERROR 
3 

3 


; 
sMMU ERROR 
; 

; 


; 
sCHECK KPORS 


3 
;MMU ERROR 
PF 

3 


; 
sMMU ERROR 
; 

; 


F 
;CHECK KPARS 


i 
3sMMU ERROR 
: 

3 


; 
sMMU ERROR 
H 

; 

i 





6511 037216 


6559 037424 


012703 


177600 
052404 


19%: 


24%: 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 7-136 
MEMORY MANAGEMENT TESTS 


#177600 ,R3 
(R3)+, 052404 
20% 


+2 

(R3)+, 0125012 
21% 

2 

R3, 0177640 
19% 

C(R3)+, 0125252 
23% 

ee 
(R3)+,@52525 
e4$ 

2 

R3,0177700 
22$ 


é 
sREVERSE ALTERNATING PATTERN 


3 g538 PEELE Eee ECE PEEL PEELE EEE, 


#172200 ,RO 
#125012, (RO)+ 


#177600, RO 
052404 , (RO 
RO, #177640 
29% 

RO, 0177700 
30 
@172200,R3_ 
(R3)+, 0125012 
32% 


+2 
(R3)+, 052404 


eesti 


sLOAD SPDORS WITH REVERSE PATTERN 
t] 
6 
Hy 


é 
;LOAD SPARS WITH REVERSE PATTERN 
: 
° 


3 
3LOAD KPORS WITH REVERSE PATTERN 
: 
’ 


é 
sLOAD KPARS WITH REVERSE PATTERN 
H 
3 


; 
sLOAD UPDRS WITH REVERSE PATTERN 
. 
; 
; 


t] 
sLOAD UPARS WITH REVERSE PATTERN 


COKDACO KDJ11-8 CLUSTER DIAG. 
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6568 037452 
8569 037454 


6570 
6571 037456 


172240 


172300 


172340 


177640 


177700 


48%: 


gE 3h: a5 


353 


383 958 FERRE 


3 25383 353 g58Sh3 958 


aa 3 


a + See 
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33% 
+2 


R3, 0172240 
31% 

(R3)+, #52525 
353 

2 

(R3)+, 0125252 
36s 

+2 

R3, 0172300 
34s 

(R3)+, 0125012 
38% 

*2 

(R3)+, 052404 
39% 

2 

R3, 0172340 
37$ 

(R3)+, #52525 
41% 

+e 

(R3)+, 0125252 
aes 

+2 

+ eaten 


40 

#177600 ,R3 
(R3)+¢, 0125012 
44s 


+2 

(R35+, 052404 
45% 

+2 

R3, 0177640 
43% 

(R3)+, #52525 
47% 

+2 

(R3)+, 0125252 
48% 

+2 
R3,0177700 
46% 


$ 
;MMU ERROR 
; 

$ 


; 
;CHECK SPARS 


i 
su ERROR 
i 

. 


; 
sMMU ERROR 
; 

‘ 


; 
s;CHECK KPDRS 


3 
;MMU ERROR 
F 

$ 


; 
sMMU ERROR 
; 

; 


; 
;CHECK KPARS 


; 
sMU ERROR 
; 

; 


; 
sMU ERROR 
; 

; 


; 
;CHECK UPDRS 
; 


: 
3;MMU ERROR 
$ 

3 


; 
sMMU ERROR 
; 

; 


; 
;CHECK UPARS 


; 
sMMU ERROR 
; 

; 


; 
;MMU ERROR 
; 


SEQ 0155 


8627 037646 
8626 


8650 
8651 037752 
8652 037760 
8653 037764 
86354 037770 
8655 037774 
8656 037776 
040000 


005037 
012737 
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160000 
143150 
177572 
000176 
160000 


177572 
177572 
000176 
000000 


120000 
177572 
000176 
120000 


040000 
177572 
000176 
040000 


MACRO M1200 


177572 


177572 


177572 


177776 


TSMMUS : 


18: 


2s: 


3%: 


as 


1$: 


4$: 
TSMM6A : 


TEST MMRO ABORT BITS 
MOV 


#160000 , 80177572 
FLAG 


Nie 


16-OCT-84 16:38 PAGE 7-136 


sLOAD MMRO<15:13>*111 


sCLEAR MMU ABORT FLAG 
° 3 SAVE SRO. IN RO 
@176,R0 ;CLEAR oe BITS FROM SRO 
en ;CHECK MARO 
3 
2 sMMU ERROR 
é 
80177572 sLOAD MMRO=0 
° sSAVE SRO IN RO 
#176,R0 sCLEAR UNDEFINED BITS FROM SRO 
— 3 CHECK MARO 
3 
2 sMMU ERROR 
3 
#120000 , 80177572 sLOAD MMRO<15:13>=101 
BeSRO,RO sSAVE SRO IN 
#176 ,R0 sCLEAR UNDEFINED BITS FROM SRO. 
tn 3 CHECK MMRO 
é 
+2 :MMU ERROR 
#40000 , 80177572 sLOAD MMRO<15:13>=010 
»RO sSAVE SRO IN RO 
#176,R0 sCLEAR UNDEFINED BITS FROM SRO. 
ny 3; CHECK MMRO 
é 
+2 :MMU ERROR 
3sMMU OFF 


TEST MARS BITS 5-0 
CLR 90177572 


sCLEAR MMU ABORT FLAG 
3LOAD MMR3<5:0>277 
;CHECK MMRS 
3 

3;MMU ERROR 
3LOAD MMR3<5:0>=0 
;CHECK MMRS 
3 

;MMU ERROR 
;LOAD MMR3<5:0>=52 
3;CHECK MMRS 


3 
;MMU ERROR 
;LOAD MMR3<5:0>=25 
;CHECK MMR3 


i 
;MMU ERROR 


TEST MFPI (MOVE FROM PREVIOUS INST SPACE) 


CLR 
MOV #77 ,80172516 
CMP 80172516,077 
BEQ is 

2 
CLR 80172516 
CMP 80172516, 40 
BEQ 2s 
ERROR +2 
MOV #52 , 80172516 
CMP 80172516, #52 
BEG 3$ 
ERROR 2 
MOV #25 ,8@172516 
CMP 80172516, 025 
BEQ 4s 
ERROR 2 
CLR 80177572 
CLR BOF LAG 
MOV #140000 , 80177776 


sMMU OFF 
;CLEAR MMU ABORT FLAG 
sPOINT TO USER SPACE 
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000246 


177776 
135072 


177777 


030017 
173621 
000244 


177572 
030011 


177572 
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177776 


177776 
172516 


000244 
137402 


177776 
177776 
177776 


135072 


177776 
000244 


177776 


18: 


1008: 


2008: 


2s: 


36: 


4t; 


5%; 


8334933899933533s 


Yi 
B 


g53 353 3582 9538 


2 
D 


g53 38888 353 i 


300%; CLR 


Bis 


PAGE 7-139 
@STBOT , SP sINIT THE USER STACK POINTER 
RE , BOSAVUSE sSAVE USER SP 
€40000 , 80177776 sPOINT TO SUPERVISOR SPACE 
@STBOT SP sINIT THE SUPERVISOR STACK POINTER 
R6 , BOSAVSUP sSAVE SUPERVISOR SP 
30000 , 80177776 sSETUP PSw 
PC pew sINIT MoU 
627 ,80172516 sSETUP POR 
90244 , -( SP) sSAVE DATA AT TEST LOCATION 
0177777, -(SP) sPUT DATA ON TOP OF STACK 
0135072 ,80244 )SETUP DATA AT TEST LOCATION 
077400 , UUPDRO sSETUP UDPDRO 10 ABORT 
0244 ,R3 1SETUP PO POINTER TO TEST LOCATION 
00177572 sTURN PU ON 
CR3)¢ s TEST INSTRUCTION 
30010 ,@0177776 sIS PSW CORRECT 
i$ sYES GO 
e2 sMMU ERROR 
sNO GO TO ERROR 
90177572 3 TURN 
#140000 , 80177776 sPOINT TO USER SPACE 
R6 , BOSAVUSE 3IS USER SP CORRECT 
1006 sYES GO ON 
2 sMU ERROR 
;NO GO TO ERROR 
40000 , 80177776 sPOINT TO SUPERVISOR SPACE 
R6 , B@SAVSUP 3IS SUPERVISOR SP CORRECT 
2Ccos 3YES GO ON 
2 sy ERROR 
3NO GO TO ERROR 
00244 , 135072 3IS TEST DATA OK 
2s 3YES GO ON 
2 3MMU ERROR 
sNO GO TO ERROR 
R3, 0246 3IS R3 CORRECT 
3% 3sYES GO ON 
e2 MU ERROR 
sNO GO TO ERROR 
90177776 sSET PSW TO KERNEL MODE 
(39), #135072 3IS KERNEL STACK CORRECT 
sYES GO ON 
*2 3*U ERROR 
sNO GO TO ERROR 
(SP), 0177777 3IS STACK CORRECT 
«4 sYES GO ON 
3NO GO TO ERROR 
030017 ,80177776 sSETUP PSW 
0173621 , 80244 3s SETUP a LOCATION 
0244 ,R1 sSETUP R 
80177572 3 TURN ow ON 
(R1) sTEST INSTRUCTION 
#30011 ,80177776 sIS PSwW CORRECT 
300% sYES GO ON 
+2 3MMU ERROR 
sNO GO TO ERROR 
90177572 ; TURN MMU OFF 


SEQ 0157 
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6745 040414 023727 
001401 


000244 173621 
000244 


177776 
173621 


177777 


177776 


177777 


177776 
177776 
177776 
172516 


000244 
136734 
000244 
177572 


303%: 


304%; 


6%: 


78: 


C13 
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CMP 90244 , 173621 
BEQ 301% 

ERROR +2 

chp R1, 0244 

BEQ west 

ERROR +2 


CLR 90177776 
cep (SP)+, 0173621 
303% 


e2 
chp (SP>,@177777 
BEQ Aid 
ERROR +2 
CLR R3 
INC 90177572 
MFP R3 
cep 04 80177776 
BEQ 63% 

°2 
CLR 90177572 
CMP R3, 00 
Bea 78 
ERROR 2 
Cor (SP)+, 00 
BEQ 8s 

+2 


cep _ 0177777 
$ 

ERROR +2 

MOV (SP)+, 80244 


sIS TEST LOCATION CORRECT 
sYES GO ON 
sMMU ERROR 
3NO GO TO ERROR 
31S R1 CORRECT 
:YES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
sSET PSW TO KERNEL MODE 
sIS STACK CORRECT 
sYES GO ON 
shy 
sNO GO TO ERROR 
sIS STACK CORRECT 
sYES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
nos wm yy FOR NEXT TEST 
sTURN MMU 
3s TEST INSTRUCTION 
sIS PSW CORRECT 
sYES GO ON 
su ERROR 
sNO GO TO ERROR 
3 TURN MMU OFF 
HIS R3 CORRECT 
3YES GO ON 
3°) ERROR 
sNO GO TO ERROR 
sIS STACK CORRECT 
3YES GO ON 
3;4U ERROR 
3NO GO TO ERROR 
sIS STACK CORRECT 
3YES GO ON 
39 ERROR 
3NO GO TO ERROR 
sRESTORE TEST LOCATION 


TEST MFPD (MOVE FROM PREVIOUS DATA SPACE) 
CLR 90177572 OFF 


CLR BOF LAG 

#140000 , 80177776 

R6 , BOSAVUSE 

€40000 , 80177776 

R6, BOSAVSUP 

#30000 , 80177776 
re 


PC, 

27 ,80172516 
90244, -( SP) 
0177777, -CSP) 


4333838538338 


3 
sCLEAR MMU ABORT FLAG 
:POINT TO USER SPACE 


sSAVE USER SP 
;POINT TO SUPERNTSOR SPACE 
3 RVISOR SP 


sSETUP PRS 

sSAVE DATA AT a LOCATION 
sPUT A ON TOP OF STACK 
1SETUP DATA aT TEST LOCATION 
sSETUP UIPDRO TO ABORT 

sSETUP POINTER TO TEST LOCATION 
; TURN MMU ON 


SEQ 0156 
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8624 040742 020327 000246 


8826 040752 005037 177776 
8829 040756 022627 157002 


8832 
8833 040766 021627 177777 


8837 040776 012737 030017 
012737 103456 


000244 
8840 041016 005237 177572 
8842 041024 022737 030011 


6846 041036 005037 177572 
8847 041042 023727 000244 


8850 
6651 041054 020127 000244 


8855 041064 005037 177776 
8856 041070 022627 103456 


88 
8860 041100 021627 177777 


D13 
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MFPD = (R3)> 
177776 CMP @30010, 80177776 
BEQ is 
ERROR +2 
1: CLR 90177572 
177776 MOV #140000, 80177776 

CMP R6 , BESAVUSE 
BEQ 1008 
ERROR +2 
177776 100$: MOV #40000 , 96177776 
CHP R6, BESAVSUP 
BEQ 2008 
ERROR +2 
157002 2008: CHP 90244 , 0157002 
BEO 2$ 
ERROR +2 
2s: CMP R3, 0246 
BEQ 38 
ERROR +2 
3$: CLR 90177776 
cup (SP)+,@157002 
BEQ as 
ERROR +2 
as: CMP (SP),0177777 
EQ S$ 
ERROR +2 
177776 S$: MOV ©30017, 80177776 
000244 HOV 0103456, 90244 
MOV 0244 ,R1 
INC 90177572 
MFPD (R11) 
177776 cH @30011, 80177776 
BEQ 3008 
ERROR +2 
3006: CLR 90177572 
103456 CHP 90244 , 0103456 
BEQ 3018 
ERROR «2 
3016: CMP R1,0244 
BEQ 3026 
ERROR +2 
3026: CLR 90177776 
CHP (SP )+, 0103456 
BEQ 303% 
ERROR +2 
3036: CMP (SP),0177777 


s TEST INSTRUCTION 
eo CORRECT 


sPOINT TO SUPERVISOR SPACE 


sIS SUPERVISOR SP CORRECT 
sYES GO ON 
sMMU ERROR 
iNO GO TO ERROR 
sIS TEST DATA OK 
3sYES GO ON 


ERROR 
sSET PSW TO KERNEL MODE 
sIS KERNEL STACK CORRECT 
YES GO ON 


3 ERROR 
sNO GO TO ERROR 
sSETUP PSW 
sSETUP TEST LOCATION 
sSETUP R1 
3; TURN MU 


ON 
iTEST INSTRUCTION 
sIS PSW CORRECT 

GO ON 


ew OFF 
Is TEST ST LOCATION CORRECT 
sYES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
3IS R1 CORRECT 
sYES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
sSET PSW TO KERNEL MODE 
7 ee CORRECT 


SEQ 0159 





COKDACO KDJ11-8 CLUSTER DIAG. 
MEMORY MANAGEMENT TESTS 
6861 041104 001401 


aoee 041174 104002 
68662 041176 005037 177776 
6683 Sennen 022627 113672 


8887 041212 021627 177777 


8889 1 
8890 
8891 041222 3 
VM 005237 177572 


6907 041270 022627 177777 


8911 041300 012637 000244 


8919 041310 005037 003030 


177776 
000244 


177776 


113672 


177776 


304%: 


4008: 


4018: 


402%: 


403%: 


404%: 


68: 


7%: 


CLR 
CLR 


Elo 
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304% 
+2 


#30017 ,80177776 


#113672 ,80244 
246 ,R1 

ors ge 

~" 


90177572 
00244 , 0113672 
401% 


2 

R1, 0244 

402% 

2 

80177776 

(SP )+, #113672 
403% 

e2 
(SP),0177777 
BOE 

2 

R3 

80177572 

R3 

04 ,80177776 
6% 

*2 

90177572 
R3,00 

7$ 

oe 

(SP)+,@0 

83 

+2 
(SP), 
cz) 

+2 

(SP )+, 80244 


0177777 


80177572 
@OF LAG 


1) 
— 1776 


sSETUP PSW 
sSETUP TEST LOCATION 
sSETUP R1 

3s TURN MMU ON 

sTEST INSTRUCTION 
sIS PSW CORRECT 

sYES GO ON 


3;MMU ERROR 
yNO GO TO ERROR 
sTURN MMU OFF 
HIS TEST LOCATION CORRECT 
sYES GO ON 
34MU ERROR 
3NO GO TO ERROR 
sIS R1 CORRECT 
sYES GO ON 
3MMU ERROR 
sNO GO TO ERROR 
sSET PSW TO KERNEL MODE 
sIS STACK CORRECT 
sYES GO ON 
3sMMU ERROR 
3sNC GO TO ERROR 
3IS STACK CORRECT 
sYES GO ON 
3 ERROR 
sNO GO TO ERROR 
sSETUP SOURCE FOR NEXT TEST 
3 TURN MMU ON 
3 TEST INSTRUCTION 
sIS PSW CORRECT 
sYES GO ON 
3;MMU ERROR 
sNO GO TO ERROR 
s TURN MMU OFF 
sIS R3 CORRECT 
sYES GO ON 
3s ERROR 
sNO GO TO ERROR 
sIS STACK CORRECT 
YES GO ON 


sNO GO TO ERROR 
sRESTORE TEST LOCATION 


TEST MTPI (MOVE TC PREVIOUS INSTRUCTION SPACE) 
MU OFF 


iCLEAR MMU ABORT FLAG 


SEQ 0160 





COKDACO KDJ11-8 CLUSTER DIAG. 
MEMORY MANAGEMENT TESTS 
6920 041314 012737 140000 
6921 041322 


8954 041506 020327 000246 
895 


8956 041516 005037 177776 
8959 041522 021627 177777 


8962 

8963 041532 012737 030017 

6964 041540 012746 145121 
000244 


8966 041550 005237 177572 
8968 041556 022737 030011 


8972 041570 005037 177572 
86973 041574 023727 000244 


Fi3 
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SEQ 0161 
177776 MOV #140000 , 80177776 sPOINT A USER SPACE 
MOV ° s SAVE R SP 
177776 MOV #40000 , 80177776 ;POINT TO SUPERVISOR SPACE 
MOV R6 , BESAVSUP sSAVE SUPERVISOR SP 
177776 MOV #30000 , 80177776 sSETUP PSW 
JSR PC Meu sINIT MMU 
172516 MOV 027 ,80172516 sSETUP MARS 
MOV 90244, -(SP) sSAVE DATA AT TEST LOCATION 
MOV 0177777, -CSP) sPUT KNOWN DATA + STACK 
MOV #120413, -( SP) sPUT TEST DATA ON STACK 
000244 MOV 0177777, 80244 sPUT KNOWN DATA AT TEST LOCATION 
136210 MOV #77400 , UDPDRO sSETUP UDPDRO TO ABORT 
MOV 0244 ,,R3 sSETUP POINTER TO TEST LOCATION 
INC 90177572 3; TURN MMU ON 
MTPI CR3)-o 3s TEST INSTRUCTION 
177776 CMP #30010 ,80177776 31S PSW CORRECT 
BEQ 1$ sYES GO ON 
ERROR +2 
sNO GO TO ERROR 
18: CLR 80177572 3 TURN MMU OFF 
177776 MOV #140000 , 80177776 ;POINT TO YSER SPACE 
CMP R6 , BOSAVUSE 3IS USER SP CORRECT 
BEQ 1008 sYES GO ON 
ERROR +2 sMMU ERROR 
3sNO GO TO ERROR 
177776 1008: MOV #40000 , 80177776 sPOINT TO SUPERVISOR SPACE 
CMP R6 , BOSAVSUP sIS SUPERVISOR SP CORRECT 
BEQ 200% 3sYES ON 
ERROR +2 3sMMU ERROR 
:NO GO TO ERROR 
120413 200%: CMP 90244 , 120415 3IS TEST LOCATION CORRECT 
BEQ 2s 3YES GO ON 
ERROR +2 3MMU ERROR 
3sNO GO TO ERROR 
2s: CMP R3, 0246 3IS R3 CORRECT 
BEQ 3$ sYES GO ON 
ERROR 2 3sMMU ERROR 
3NO GO TO ERROR 
3%: CLR 7776 sSET PSW TO KERNEL MODE 
CMP (30), 6177777 :IS KERNEL STACK CORRECT 
BEQ sYES GO ON 
ERROR - 3MMU ERROR 
sNO GO TO ERROR 
177776 48: MOV #30017 ,84177776 3SETUP PSW 
MOV #145121, -(SP) sSETUP TEST DATA 
0244 ,,R1 sSETUP R1 
INC 86177572 3 TURN MMU ON 
MTPI (R1) 3TEST INSTRUCTION 
177776 CMP #30011 ,80177776 3IS PSW CORRECT 
BEQ 300% sYES GO ON 
ERROR +2 3MMU ERROR 
sNO GO TO ERROR 
300%: CLR 80177572 3 TURN MMU OFF 
145121 CMP 00244 , 145121 sIS TEST LCCATION CORRECT 
BEQ 301% sYES GO ON 
ERROR +2 3MMU ERROR 


MEMORY MANAGEMENT TESTS 
8977 041606 020127 


6978 041612 001401 
6979 041614 104002 
8960 


90 
9035 042022 010637 


000244 


177776 
177777 


030017 
122347 


000246 
177572 
030011 


177572 
000244 


000244 


177776 
177777 


177572 
000000 


177777 


000244 


177572 
0030 


177776 


177776 


122347 


177776 


177776 


3018: 


302%: 


304%: 


404%; 


5%: 


CMP 


CLR 


G13 
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R1, 0244 
= 9m 


90177776 
(SP),@177777 
304% 


e2 


#30017 ,80177776 
#122347, -(SP) 


#246 ,R1 
90177572 


-(R1) 
030011 , 80177776 
400% 


2 
90177572 


00244 , 122347 
401% 


2 

R1, 0244 
402% 

+2 

90177776 
(SP),0177777 
404% 

+2 

-(SP) 
84177572 

RS 

04 ,80177776 
5$ 

e2 

20177572 

R3, 00 


6% 
+2 


(SP )+,@177777 
7$ 


+2 
(SP)+, 80244 


SOF LAG 
#140000 , 80177776 


R6 , BOSAVUSE 


IS Ri —_ 
sYES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
sSET PSW TO KERNEL MODE 


sIS STACK CORRECT 
sYES GO ON 


3;MMU ERROR 

sNO GO TO ERROR 
sSETUP PSW 
sSETUP TEST DATA 
sSETUP R1 
3 TURN MMU ON 
sTEST INSTRUCTION 
sIS PSW CORRECT 
sYES GO ON 

3MMU ERROR 

3NO GO TO ERROR 

3TURN MMU 

HIS TEST “LOCATION CORRECT 
sYES GO ON 


: 
3NO GO TO ERROR 
sIS STACK CORRECT 
GO ON 


3NO GO TO ERROR 
3: SETUP te = FOR NEXT TEST 
3TURN MMU ON 
3; TEST INSTRUCTION 
sIS PSW CORRECT 
GO ON 


RROR 
sNO GO TO ERROR 


RROR 
3NO GO TO ERROR 
sRESTORE TEST LOCATION 


TEST MTPO (MOVE TO PREVIOUS DATA SPACE) 
90177572 OF 


3 F 

:CLEAR MMU ABORT FLAG 
SPOINT TO USER SPACE 
sSAVE USER SP 


SEQ 0162 


COKDACO KDJ11-8 CLUSTER DIAG. 
MEMORY MANAGEMENT TESTS 
012737 
° 


000246 


177776 
177777 


030017 
100737 
000244 


177572 
737 030011 


177572 
000244 


9090 
9091 042306 000244 


M25 
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177776 MOV #40000 , 80177776 
MOV R6 , BOSAVSUP 
177776 MOV #30000 , 80177776 
JSR PC MoU 
172516 MOV 027 ,8@172516 
MOV 00244 , -(SP) 
MOV 0177777, -CSP) 
MOV #100004, - ) 
000244 MOV 0177777 ,@0244 
135470 MOV o7 . 
MOV -R3 
INC 90177572 
MTPD CR3)- 
177776 CMP #30010, 80177776 
BEQ 1$ 
ERROR +2 
18: CLR 90177572 
177776 MOV #140000 , 80177776 
CMP » B@SAVUSE 
BEQ 
ERROR 2 
177776 100%: MOV #40000 , 80177776 
CMP R6 , BOSAVSUP 
BEQ 200% 
ERROR +2 
100004 2008: CMP 80244 , 0100004 
BEQ 2s 
ERROR +2 
2s: CMP R3, 0246 
BEQ 3$ 
ERROR +2 
3%: CLR 90177776 
CMP (SP),@177777 
BEQ 43 
ERROR +2 
177776 4$: MOV 030017 ,80177776 
MOV #100737, -( SP) 
mov 0244 ,,R1 
INC 80177572 
MTPD CR1) 
177776 CMP #30011 ,80177776 
BEO 300% 
ERROR 2 
300%: CLR 80177572 
100737 CMP 90244 , 100737 
BEQ 301% 
ERROR +2 
3018: CMP R1,0244 
BEQ 302% 


+SAVE SUPERVISOR SP 
PSW 


sPUT TEST rcnen tate ON ST nex 
sPUT KNOWN DATA AT TEST LOCATION 
TO ABORT 


UIPDRO 
sSETUP POINTER TO TEST LOCATION 
s TURN MMU ON 
s_TEST INSTRUCTION 

PSW CORRECT 


PF 

sNO GO TO ERROR 

sPOINT TO SUPERVISOR SPACE 
3IS SUPERVISOR SP CORRECT 
sYES GO ON 

As 28) 

sNO GO TO ERROR 
3IS TEST LOCATION CORRECT 
sYES GO ON 

3MMU ERROR 

sNO GO TO ERROR 
3IS R3 CORRECT 
sYES GO ON 

3sU ERROR 

sNO GO TO ERROR 

sSET PSW TO KERNE 


L MODE 
sIS KERNEL STACK CORRECT 
sYES GO ON 


TUP PSW 
sSETUP TEST DATA 
sSETUP R1 

3 TURN MMU ON 
sTEST INSTRUCTION 
3IS PSW CORRECT 
:YES GO ON 


MMU OFF 
HIS TEST LOCATION CORRECT 
sYES GO ON 
:4MU ERROR 
sNO GO TO ERROR 
3IS Ri — 
sYES GO ON 


SEQ 0163 





113, 
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SEQ 0164 

MEMORY MANAGEMENT TESTS | 

9093 042314 104002 ERROR +2 3MMU ERROR | 

SOBs sNO GO TO ERROR 

9095 042316 005037 177776 302%: CLR 90177776 sSET PSW TO KERNEL MODE | 

9096 042322 021627 177777 CMP (SP),@177777 sIS STACK CORRECT 

9097 042326 001401 BEQ 304% sYES GO ON 

9098 042330 104002 ERROR +2 s;MMU ERROR 

9099 :NO GO TO ERROR 

9100 042332 012737 030017 177776 304%: MOV #30017 ,80177776 sSETUP PSW 

9101 042340 012746 156711 MOV #156711, -(SP) sSETUP TEST DATA 

9102 042344 012701 000246 MOV 0246 ,R1 sSETUP R1 

9103 042350 005237 177572 INC 80177572 3 TURN MMU ON 

9104 042354 106641 MTPD -(R1) ITEST INSTRUCTION 

9105 042356 022737 030011 177776 CMP #30011 ,80177776 3IS PSW CORRECT 

9106 042364 001401 BEQ 400% sYES GO ON 

9107 042366 104002 ERROR +2 sMMU ERROR 

9108 sNO GO TO ERROR 

9109 042370 005037 177572 400%: CLR 90177572 3; TURN MMU OFF 

9110 042374 023727 000244 156711 CMP oe: 9156711 sIS TEST LOCATION CORRECT 

9111 042402 001401 BEQ sYES GO ON 

9112 042404 104002 ERROR ~ we aU 

9113 sNO GO TO ERROR 

9114 042406 020127 000244 4018: CMP R1,0244 sIS Ri CORRECT 

9115 042412 001401 BEQ 402% sYES GO ON 

9116 042414 104002 ERROR +2 3sMMU ERROR 

9117 sNO GO TO ERROR 

9116 042416 005037 177776 402%: CLR 90177776 sSET PSW TO KERNE. MODE 

9119 042422 021627 177777 CMP (SP),@177777 sIS STACK CORRECT 

9120 042426 001401 BEQ MOMS sYES GO ON 

9121 042430 104002 ERROR +2 3sMMU ERROR 

9122 3NO GO TO ERROR 

9123 042432 005046 404%: CLR -(SP) ;SETUP STACK FOR NEXT TEST 

9124 042434 005237 177572 INC 90177572 3; TURN PU ON 

9125 042440 1066035 MTPO RS 3 TEST INSTRUCTION 

9126 042442 022737 000004 177776 CMP 04 ,80177776 3IS PSW CORRECT 

9127 042450 001401 BEQ 53% sYES GO ON 

9126 042452 104002 ERROR +2 ;MU ERROR 

9129 sNO GO TO ERROR 

9130 042454 005037 177572 5$: CLR 90177572 ;TURN MPU OFF 

9131 042460 020327 000000 CMP R3,00 3IS R3 CORRECT 

9132 042464 001401 BEQ 6% sYES GO ON 

9133 042466 104002 ERROR +2 sMPU ERROR 

9134 3NO GO TO ERROR 

9135 042470 022627 177777 6%: CMP (SP)+,@177777 3IS STACK CORRECT 

9136 042474 001401 BEQ 7$ sYES GO ON 

9137 042476 104002 ERROR +2 PU ERROR 

9138 sNO GO TO ERROR 

94 042500 012637 000244 7%: MOV (SP )+, 80244 sRESTORE TEST LOCATION 

9141 

9144 042504 TSMMU7: 

9145 3 TEST NON-RESIDENT ABORT 

9146 042504 005037 177572 CLR 9@177572 seu OFF 

9147 042510 005067 140314 CLR FLAG ;CLEAR MMU ABORT 

9148 042514 013746 000214 MOV 00214, -(SP) ‘satan DATA AT TEST LScarzons 

9149 042520 013746 000216 MOV 00216, -(SP) 

9150 042524 005067 140312 CLR SAVMRO ICLEAR STATUS REGS SAVE AREAS 


9151 042530 005067 140310 CLR SAVMR1 jl 





COKDACO KDJ11-8 CLUSTER DIAG. 


MEMORY MANAGEMENT TESTS 


9207 042770 
9208 042772 


005067 
004767 
012737 
012702 
012737 
004767 


012737 
004767 
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177776 
177600 


177600 


140206 
177572 
177776 


177776 
177776 


177600 


140046 
177572 


: 
TS7: 


CLR SAVMR2 
JSR PC, MMU 
MOV #30000 , 80177776 
MOV #200 ,R2 
MOV #77400 , 80177600 
JSR PC,TS7 
MOV 077404 ,80177600 
JSR »1S7 
MOV #220,R1 
JSR PC MMU 
CLR R3 
MOV #1,FLAG 
MOV #1,80177572 
MOV #100000 , 86177776 
MOV (R2)+,-CR1) 
JSR PC, TSM7 
CLR SAVMRO 
CLR SAVMR1 
CLR SAVMR2 
MOV #22,R3 
MOV #1,FLAG 
MOV #1,80177572 
MOV #20000 , 80177776 
MFPI CR2)+ 
JSR PC, TSM7 
MOV #30000 , 80177776 
MOV #77400 , 80177600 
CLR 90177572 
MFPI (R2)+ 
MOV (SP)+,R3 
MOV (SP )+, 80216 
MOV (SP)+, 80214 
JMP TS7FIN 

; 

sROUTINE TO CAUSE AND CHECK 
MOV #1,FLAG 
MOV @1,90177572 
MOV R7,R1 
MFPI (R2)+ 


_J13 


: 
sINIT MMU 
;SETUP PSW 


; 

sSETUP FOR AN ABORT 

sCAUSE AN ABORT TO OCCUR AND 

s THEN CHECK IF ABORT FLAG REGISTERED 
sTHIS EVENT AND yee ek STATUS REGS 


sCAUSE AN ABORT TO OCCUR AND 
44 CHECK IF ABORT FLAG REGISTERED 


sTHIS EVENT AND CHECK IF STATUS REGS 
sCONTAINED EXPECTED VALUES 
sIF NO T OC THEN GO TO ERROR 


sOTHERWISE CONTINUE 


sINIT MMU 
} SETUP MMR1 EXPECTED DATA 
;SETUP FLAG FOR AN ABORT 

3 TURN MMU ON 

sSETUP — FOR AN ABORT (ILLEGAL MODE) 
sCAUSE AN ABORT 

sCHECK IF AN ABORT OCCURRED BY 
sCHECKING ABORT FLAG AND STATUS REGS 
sIF NO ABORT OCCURRED THEN GO TO ERROR 
sOTHERWISE CONTINUE. 

;CLEAR STATUS REGS SAVE AREAS 

3 


3 
sSETUP MARI EXPECTED DATA 
3;SETUP FLAG FOR AN ABORT 

3; TURN MMU ON 

sSETUP — FOR AN ABORT CILLEGAL MODE) 


sCAUSE AN ABORT 

i CHECK IF AN ABORT OCCURRED BY 
sCHECKING ABORT FLAG “ND STATUS REGS 
3sIF NO ABORT OCCURRED THEN GO TO ERROR 
sOTHERWISE CONTINUE. 

3SETUP PSW 

sSETUP FOR AN ABORT 

3sMMU OFF 

+ TRY TO CAUSE AN ABORT 

3;POP THE STACK 

sRESTORE DATA AT TEST LOCATIONS 

F 


NONRESIDENT ABORTS 


sSETUP FOR AN ABORT 
3 TURN MMU ON 


COKDACO KDJ11-8 CLUSTER DIAG. 
MEMORY MANAGEMENT TESTS 
9209 042774 022767 900000 
9210 043002 001401 
9211 043004 104002 


9212 
9213 043006 105067 140030 
9214 043012 022767 100000 


9221 

9222 043036 026701 140004 
9223 043042 001401 

9224 104002 

9225 

9226 043046 005067 137770 
9227 043052 005067 157766 


36 
9237 043076 042737 040377 
9238 043104 022767 100000 


9242 043116 020367 1537722 


9267 043232 010701 


K13 


MACRO M1200 18-OCT-84 16:38 PAGE 7-146 


140026 CMP @0,FLAG s0ID AN ABORT OCCUR 
BEQ OK7 sIF YES GO ON 
ERROR +2 3;MMU ERROR 
s;IF NO GO TO ERROR 
OK7: CLRB SAVMRO 3 SETUP ee ras DATA 
140022 CHP #100000 , SAVMRO 3; TEST MMRO FOR EXPECTED VALUE 
BEQ OKA7 sIF OK THEN CONTINUE 
ERROR +2 3;MMU ERROR 
s;NOT OK THEN GO TO ERROR 
000022 OKA?: CMP SAVMR1 , 22 3s TEST MARI FOR EXPECTED VALUE 
BEQ OKAY7 3IF OK THEN CONTINUE 
ERROR +2 3;MMU ERROR 
;NOT OK THEN GO TO ERROR 
OKAY7: CMP SAVMR2 ,R1 3; TEST MMR2 FOR EXPECTED VALUE 
BEQ OKAY7A sIF OK THEN CONTINUE 
ERROR +2 3MMU ERROR 
sNOT OK THEN GO TO ERROR 
OKAY7A: CLR SAVMRO ;CLEAR STATUS REGS SAVE AREAS 
CLR SAVMR1 3 
CLR SAVMR2 $ 
RTS PC 3;RETURN 
3 
sROUTINE TO CHECK IF A NONRESIDENT ABORT OCCURRED 
; 
137736 TSM7: CMP @0,.FLAG sDID AN ABORT OCCUR 4, 
8&9 TSMA 3IF YES GO ON : 
ERROR +2 3;MMU ERROR 
VIF NO THEN GO TO ERROR 
003042 TSMA: BIC 040377 , B@SAVMRO ;SETUP EXPECTED DATA 
137730 CMP #100000 , SAVMRO ; TEST MMRO FOR EXPECTED VALUE 
BEQ TSMB 3IF OK THEN CONTINUE 
ERROR +2 3MMU ERROR 
;IF NO THEN GO TO ERROR 
TSMB: CMP R3,SAVMR1 ; TEST MMR1 FOR EXPECTED VALUE 
= st tee 3IF OK THEN CONTINUE 
RROR & 


3sMMU ERROR 
3IF NOT OK THEN GO TO ERROR 
3;RETURN 


3 
TS7FIN: NOP 
TSMMU6B : 


; TEST READ ONLY ABORTS 

CLR 80177572 3sMMU OFF 

CLR FLAG ;CLEAR MMU ABORT FLAG 

MOV 90244, -(SP) pie DATA AT TEST LOCATIONS 

MOV 90246, -(SP) 

CLR SAVMRO SCLEAR STATUS REGS SAVE AREAS 

CLR SAVMR1 : 

CLR SAVMR2 3 

JSR PC MMU ;INIT MMU 
177776 MOV #30000 , 80177776 ;SETUP PSW 

MOV 0244 ,R2 F 
177600 MOV 077402 ,8@177600 ;SETUP FOR AN ABORT 

MOV @246,-(SP) 3PUSH DATA ONTO THE STACK 
137604 MOV #1,FLAG ;SETUP FLAG FOR AN ABORT 
177572 MOV #1,80177572 3; TURN MMU ON 

MOV R7,R1 sSAVE PC 





006622 
022767 
001401 
104002 


005037 
012703 
012701 


COKDACO KDJ11-8 CLUSTER DIAG. 
MEMORY MANAGEMENT TESTS 


044046 
044116 
044164 
000030 


177572 
044056 
044126 


137564 


137560 


137550 


177776 


177776 


172516 


18: 


2s: 


3%: 


43: 


Li3 


SEQ 0167 
MTPI (R2)+ sCAUSE ABORT 
CMP 00 ,FLAG s0ID ABORT OCCUR 
BEQ 1$ 3;IF YES THEN GO ON 
ERROR +2 3sMMU ERRCR 
;IF NO TKEN GO TO ERROR 
CLRB SAVMRO sSETUP EXPECTED DATA 
CMP #20000 , SAVMRO s TEST MARO FOR EXPECTED VALUE 
BEQ 2s sIF OK THEN CONTINUE 
2 sMMU ERROR 
sOTHERWISE GO TO ERROR 
CMP #11026 , SAVMR1 3s TEST MARI FOR EXPECTED VALUE 
BEQ 3% sIF OK THEN CONTINUE 
+2 3;MMU ERROR 
sOTHERWISE GO TO ERROR 
CMP R1, SAVMR2 s TEST MMR2 FOR EXPECTED VALUE 
BEQ As 3IF OK THEN CONTINUE 
ERROR +2 sMMU ERROR 
s;OTHERWISE GO TO ERROR 
MOV #30000 , 80177776 sSETUP PSW 
MOV @2,-(SP) 3PUSH DATA ONTO STACK 
MTPI (R2)+ _s TRY TO CAUSE ABORT 
MOV (SP )+, 80246 sRESTORE DATA AT TEST LOCATIONS 
MOV (SP)+, 80244 PF 
TEST PAGE LENGTH ERROR ABORTS 
CLR 90177572 sMMU OFF 
CLR FLAG ;CLEAR MMU ABORT FLAG 
CLR SAVMRO ;CLEAR STATUS REGS SAVE AREAS 
CLR SAVMR1 
CLR VMRO 
MOV #30000 , 80177776 ‘SETUP PSW 
JSR ° ;INIT MMU 
MOV OPLFO,R3 iLET R3, R1, AND R2 POINT TO THE 
MOV eR1 ;UPWARD EXPANSION TABLES 
MOV TO,R2 F 
MOV 026 , 80172516 sDISABLE USER DATA SPACE 
JSR ° 3; TURN MMU ON 
300 RELOCATIONS FOR THE DIFFERENT 
sVALUES OF THE PAGS _— FIELD AND 
sBLOCK IF AN ABORT OCCURS 
1 CHECK TO SEE IF IT WAS SUPPOSED TO, 
sAND IF YES CHECK ABORT FLAG AND 
STATUS REGISTERS. 
MOV OPLF1,R3 ;LET R3, R1, AND R2 POINT TO THE 
MOV @6N1,R1 ; DOWNWARD EXPANSION TABLES 
MOV @ABORT7 ,R2 3 
JSR PC, TSM9 ;TURN MMU ON 
300 RELOCATIONS FOR THE DIFFERENT 
;VALUES OF THE PAGE LENGTH FIELD AND 
;BLOCK NUMBER. IF AN ABORT OCCURS 
sCHECK TO SEE IF IT WAS SUPPOSED TO, 
:AND IF YES CHECK ABORT FLAG AND 
iSTATUS REGISTERS. 
CLR 80177572 se OFF 
MOV @PLF1+10,R3 SPOINT TO A VALUE WHICH SHOULD CAUSE 
MOV #6N1+10,R1 ;AN ABORT IF meu IS ON. 
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MEMORY MANAGEMENT TESTS 


9382 043660 
9383 043662 


011337 


177600 


137262 


137236 


137210 
137216 
137214 
137212 


000777 


137324 
177572 


137274 


137260 


137254 


137244 


MOV (R3), 80177600 
MFPI (Ride 

MOV (SP )+ RS 

JP 


TSOF IN 


FS fo. - 


sSETUP UIPORO 


s00 A RELOCATION 


;POP THE STACK 


; 
sROUTINE TO CAUSE AND CHECK PAGE LENGTH ERROR ABORTS 


3 
TSM9: 


1%: 
2s: 


4s: 


S$: 


F 
PLFO: 


(R3)+, 80177600 
R1,RO 


@1,.FLAG 
@1,80177572 


BEELER CEEEE 


2 gle Fag 9898 | 


a5 
© 
° 

N@e 


INC R1 
INC R1 
INC R2 
Re 

CMP (R3),0777 
BNE TSM9 
RTS PC 

; 

sUPWARD EXPANSION TABLES 
-WORD 70006 
-WORD 70006 
-WORD 70006 
-WORD 13406 


3 ERROR 
sNO GO TO ERROR 
sSETUP EXPECTED DAT 


; SETUP 


UIPORO 
sSAVE A CUPY OF R1 
SETUP gli ABORT 


3WAS AN 
3P0P THE STACK 


s0ID AN ABORT OCCUR 


:NO GO ON 


s*U ERROR 

YES GO TO ERROR 
; 

s0ID AN ABORT OCCUR 


sYES GO ON 


PC 
:00 A on tates ie OPERATION 
ABORT SUPPOSED TO OCCUR 
siF YES GO TO 2% 


A 
;_TEST MMRO FOR EXPECTED VALUE 
ONT INUE 


3;IF OK THEN C 


sMMU ERROR 
sNOT OK THEN GO TO ERROR 


s_TEST MAR1 FOR EXPECTED VALUE 


sIF OK THEN CONTINLE 
3;MMU ERROR 
sNOT OK THEN GO TO ERROR 


: TEST MMR2 FOR EXPECTED VALUE 


;IF OK THEN CONTINUE 
3MMU ERROR 

;NOT OK THEN GO TO ERRCR 
sCLEAR MMU ABORT 


FLAG 
;CLEAR STATUS REGS SAVE AREAS 


3 
:POINT TO NEXT ENTRY 


3NO 
:YES RETURN 


; 
sHAVE ALL ENTRIES BEEN TRIED 
REPEAT 
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9384 043664 020006 -WORD 20006 
9365S 043666 004006 -WORD 04006 
9386 043670 -WORD 40006 
9387 043672 070006 -WORD 70006 
9388 043674 024006 -WORD 24006 
9389 043676 004006 -WORD 04006 
9390 043700 014006 -WORD 14006 
9391 043702 -WORD 12006 
043704 -WORD 02006 
9393 043706 001406 -WORD 01406 
9394 043710 004006 -WORD 04006 
9395 043712 002006 -WORD 02006 
9396 043714 -WORD 00406 
9397 043716 007406 -WORD 07406 
9396 043720 001006 -WORD 01006 
9399 043722 -WORD 03406 
9400 043724 000777 -WORD 777 
9401 043726 0135000 BNO -WORD 013000 
9402 043730 016000 -WORD 016000 
9403 043732 017000 -WORD 017000 
9404 043734 002700 -WORD 002700 
9405 043736 014000 -WORD 014000 
9406 043740 -WORD 002000 
9407 043742 004000 -WORD 004000 
9408 043744 007000 -WORD 007000 
043746 .WORD 002000 
9410 043750 000700 -WORD 000700 
9411 043752 004000 -WORD 004000 
9412 043754 001000 -WORD 001000 
9413 043756 000300 -WORD 000300 
9414 043760 -WORD 000400 
9415 063762 001400 -WORD 001400 
9416 043764 -WORD 000600 
9417 043766 -WORD 000200 
9416 043770 001700 -WORD 001700 
9419 043772 -WORD 000300 
9420 043774 000700 -WORD 000700 
9421 043776 000000 ABORTO: .WORD 0 
9422 044000 000000 -WORD 0 
9423 044002 000001 -WORD 1 
9424 044004 000000 -WORD O 
044006 000001 -WORD 1 
9426 044010 000001 -WORD 1 
9427 044012 000000 -WORD O 
9426 044014 000000 -WORD 0O 
9429 044016 000000 -WORD O 
9430 044020 000000 -WORD O 
9431 044022 000001 -WORD 1 
9432 044024 000000 -WORD 0 
9433 044026 000000 -WORD O 
34 044030 000001 -WORD 1 
9435 044032 000001 -WORD 1 
9436 044034 000001 -WORD 1 
9437 044036 000001 -WORD 1 
9438 044040 000000 -WORD O 
9439 044042 000001 -WORD 1 
044044 000000 -WORD O 
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‘ 

;DOWNWARD EXPANSION TABLES 
’ 
PLF1: 


PEEEEEEEEEE EE EEEE ELE CEEEEE EEE EEE EE EEEE EEE EEEEE EEE EE 


ABORT7: 


Saat 


SEQ 0170 


eC C+ + — 


ores 
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000000 
000001 


177776 
177636 


136444 
177572 


177776 
172212 


136370 
177572 


177776 


136322 
177572 


C14 


su OFF 

sCLEAR MMU ABORT FLAG 

SCLEAR STATUS REGS SAVE AREAS 
$ 


F 
sINIT MMU 
sINIT PSW: PREVIOUS MODE = KERNAL 


$ 
sSETUP KIPOR1 TO ABORT 
sSETLP FLAG FOR AN ABORT 
3s TURN MMU ON 


sSAVE PC 

:00 A RELOCATION VIA KIPARI 
sSETUP EXPECTED DATA 

sCHECK IF AN ABORT OCCURRED AND 
VIF YES CHECK BITS <6:1> OF PRO. 
sINIT PSW: PREVIOUS MODE = USER 
sINIT MMU 


sSETUP UDPDR7 TO ABORT 


: 
sSETUP FLAG FOR AN ABORT 
TURN MPU ON 

sSAVE PC 

300 A RELOCATION VIA UDPAR7 

sSETUP EXPECTED DATA 

sCHECK IF AN ABORT OCCURRED AND 

sIF YES CHECK BITS <6:1> OF MRO. 

T PSU: PREVIOUS MODE= SUPERVISOR 


05 
sSETUWP FLAG FOR AN ABORT 
3 TURN MMU ON 
sSAVE PC 
300 A RELOCATION VIA SIPARS 


PAGE 7-153 
-WORD 0 
-WORD 1 
.WORD 0 
-WORD 0 
TSOFIN: NOP 
TSMM10: 
; FUNCTIONAL TEST OF BITS <6:1> OF MMRO 
CLR 00177572 
CLR FLAG 
CLR SAVMRO 
CLR SAVAR1 
CLR SAVMR2 
JSR Aaa.) 
CLR 90177776 
MOV #20200 ,R2 
MOV 077400 ,8@172302 
MOV @1,FLAG 
MOV 4 Nada 
MOV R7,R1 
MPI (R2)> 
MOV #100003 ,R4 
JSR PC.7S10 
MOV #30000 , 80177776 
JSR PC, 
MOV @77400 , 80177636 
MOV #160000 ,R2 
MOV @1,FLAG 
MOV #1 ,80177572 
MOV R7,R1 
MFPOD (R2)- 
MOV #100177 ,R4 
JSR PC, 7S10 
MOV #10000 , 80177776 
JSR PC pew 
MOV 077400 ,8@172212 
MOV 3 oR2 
MOV FLAG 
MOV @1,80177572 
MOV R7,R1 
MPI (R2)+ 
MOV #100053 ,R4 
JSR PC,1S10 


3 
sTEST THAT ILLEGAL MODE CAUSES MMU ABORT 


g 


JSR 
MOV 


#20000 , 80177776 


@1,FLAG 
@1,80177572 
R7,R1 

(R2)+ 
#100105 ,R4 


s SETUP oon DATA: ABORT, PAGE OS 
CHECK IF AN ABORT OCCURRED AND 
VIF YES CHECK BITS <6:1> OF MMRO. 


sINIT PSW:SET ILLEGAL PREVIOUS MODE 
sINIT MMU 

sSET UWP ACCESS TO PAGE 2 

sSETUP FLAG FOR AN ABORT 

, TURN MMU ON 


sSAVE PC 
100 A RELOCATION 
sSETUP EXPECTED DATA: ABORT, ILLEGAL 


SEQ 0171 


i = 





D14 
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SEG 0172 
MEMORY MANAGEMENT TESTS 
9557 s PROCESSOR MODE, PAGE 02 
9558 044524 004767 000004 JSR PC,1S10 sCHECK IF AN ABORT OCCURRED AND 
9559 sIF YES CHECK BITS <6:1> OF MMRO. 
9560 
1 044530 000167 000062 JMP TLOF IN 
9562 3 
9563 sROUTINE TO CHECK IF A MMU ABORT OCCURRED AND IF STATUS REG MMRO 
9564 ;CONTAINS EXPECTED DATA 
9565 3 
9566 044534 022767 000000 136266 1510: CMP @0,FLAG s0ID AN ABORT OCCUR 
9567 044542 001401 BEQ 1s sYES GO ON 
9568 044544 104002 ERROR +2 sMMU ERROR 
S5H9 3NO GO TO ERROR 
9570 044546 020467 136270 18%: CMP R4, SAVMRO 3s TEST MARO FOR EXPECTED DATA 
9571 044552 001401 BEQ et 30K GO ON 
9572 044554 104002 ERROR +2 3sMMU ERROR 
9573 sNO GO TO ERROR 
9574 044556 022767 000022 136260 2%: CMP 022 , SAVAR1 s TEST MAR1 FOR EXPECTED DATA 
9575 044564 001401 BEQ 3% 30K GO ON 
9576 044566 104002 ERROR +2 sMMU ERROR 
9577 sNO GO TO ERROR 
9578 044570 020167 136252 3%: CHP R1, SAVARD 3 TEST MARS FOR EXPECTED DATA 
9579 044574 001401 BEQ 43 30K GO ON 
9580 044576 104002 ERROR +2 sMMU ERROR 
9581 sNO GO TO ERROR 
9582 044600 005067 136236 4s: CLR SAVMRO sCLEAR MMU STATUS REGS SAVE AREAS 
9563 044604 005067 136234 CLR SAVAR1 3 
9584 044610 005067 136232 CLR SAVMRO 3 
9585 044614 000207 RTS PC ;RETURN 
9587 044616 TIOF IN 
9590 044616 TSMM11: 
9591 3 et DATA pte Mein MMR 3 
9592 044616 005037 177572 CLR 9017 sMMU OFF 
9593 044622 005067 136202 CLR FL ." sCLEAR MMU ABORT FLAG 
9594 044626 012737 030000 177776 MOV + 7 gilli sSETUP PSW 
9595 044634 012701 MOV $26 ,R1 ;SETUP FIRST MMRS VALUE 
044640 012703 177610 MOV #177610, R3 sPOINT TO UIPOR4E 
9597 044644 012704 1 MOV 021 ,R4 sSETUP SECOND MARS VALUE 
9596 044650 C©04767 000060 JSR PC.TSil s TEST ENABLE USER DATA SPACE BIT 
9599 044654 012737 000000 177776 MOV @0,80177776 sSETUP PSW 
9600 044662 012701 3 MOV 023,R1 sSETUP FIRST MARS VALUE 
1 012703 172310 MOV #172310,R3 sPOINT TO KIPOR4 
9602 044672 012704 MOV Ps gtr sSETUP SECOND MARS VALUE 
9603 044676 004767 000032 JSR PC.7S11 3 TEST ENABLE KERNEL DATA SPACE BIT 
9604 044702 012737 010000 177776 MOV ¢10000, 00177776 sSETUP PSW 
9605 044710 012701 000025 MOV R1 :SETUP FIRST MARS VALUE 
9606 044714 012703 172210 MOV ei 7210, R3 sPOINT TO SIPDR4 
9607 044720 012704 MOV 622 ,R sSETUP SECOND MARS VALUE 
9608 044724 004767 JSR PC, isi1 ; TEST ENABLE SUPERVISOR DATA SPACE BIT 
9610 044730 000167 000120 JMP TLIFIN 
F 
ar | sROUTINE TO TEST ENABLE DATA SPACE BITS OF MARS 
$ 
9614 044734 004767 070126 TS11: JSR 


PC MMU sINIT MMU 
9615 044740 010137 172516 MOV R1, 80172516 sDISABLE DATA SPACE OF MODE UNDER TEST 


E14 
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SEQ 0173 


9616 044744 012713 077400 MOV #77400,(R3) sSETUP IPDR TO ABORT 
9617 044750 012702 100000 MOV #100000 ,R2 : 
9618 044754 012767 000001 136046 MOV @1,FLAG sSETUP FLAG FOR AN ABORT 
9619 044762 012737 000001 177572 MOV #1 ,80177572 sMMU ON 
044770 106522 MFPD (R2)+ s00 A RELOCATION 
9621 044772 022767 000000 136030 CMP #0 ,FLAG sO0IO AN ABORT OCCUR 
9622 045000 001401 BEQ 1% sYES GO ON 
9623 045002 1 ERROR +2 sMMU ERROR 
S624 sNO GO TO ERROR 
9625 045004 010437 172516 18: MOV R4 , 80172516 sENABLE DATA SPACE OF MODE UNDER TEST 
9626 045010 0127 100000 MOV #100000 ,R2 ’ 
9627 045014 012767 000001 136006 MOV #1,FLAG sSETUP FLAG FOR AN ABORT 
9628 04 012737 000001 177572 @1,80177572 sw ON 
9629 045030 106522 MFPD (R2)+ 300 A RELOCATION 
9630 045032 005726 TST (SP )- sPOP THE STACK 
9631 0450 022767 000001 1535766 @1,FLAG sO0ID AN ABORT OCCUR 
9632 045042 001401 BEQ 2s sNO GO ON 
9633 045044 104002 +2 she 
9634 sYES GO TO ERROR 
9635 045046 005067 155756 2s: CLR FLAG sCLEAR MMU ABORT FLAG 
a 045052 000207 RTS PC 3RETURN 
9638 045054 TL1F IN 
9641 045054 TSMM12 
; MMR1 FUNCTIONAL TEST 
9643 045054 005037 177572 CLR 80177572 sm OFF 
9644 045060 005067 1535744 CLR FLAG sCLEAR MMU ABORT FLAG 
9645 045064 005067 155 CLR SAVMR1 sCLEAR STATUS REG SAVE AREA 
045070 004767 067772 JSR PC MMU sINIT MMU 
9647 045074 012737 030000 177776 MOV #30000 , 80177776 sINIT PSW 
9648 045102 012704 100200 MOV #100200 ,R4 sSETUP TEST LOCATIONS 
9649 045106 010401 MOV R1 ; 
9650 045110 012705 100101 MOV #100101 ,R5 H 
9651 045114 01 MOV RS ,R2 : 
9652 045116 012737 172516 MOV 20 , 8017251 sINIT MAR 
9653 045124 012737 077402 172310 MOV 077402 ,80172310 sSETUP KIPDR4 TO ABORT 
S4 045132 612703 006414 MOV 14,R3 sSETUP EXPECTED DATA FOR MARI 
9655 045136 012767 000001 135664 MOV @1,FLAG SETUP FLAG FOR AN ABORT 
S6 045144 012737 000001 177572 MOV #1,80177572 iT MoU ON 
9657 045152 010767 135634 Mov » SLOC sSAVE PC 
9656 045156 1 MOVB (R4)+,CRS)> 00 A RELOCATION 
9659 045160 004767 000206 JSR PC, TS12 sCHECK IF AN ABORT OCCURRED AND IF 
9660 sYES IF MARI EQUALS we — 
9661 045164 012703 175011 MOV #175011,R3 sSETUP EXPECTED DATA FOR MAR 
045170 012767 000001 135632 MOV #1,FLAG sSETUP FLAG FOR AN ABORT 
9663 045176 012737 000001 177572 MOV #1,80177572 s TURN MMU ON 
On 010767 135602 MOV R7,SLOCOO sSAVE PC 
9665 045210 112142 MOVE (R1)+, -C(R2) 100 A RELOCATION 
9666 045212 004767 000154 JSR PC, TS12 sCHECK IF AN ABORT OCCURRED AND IF 
9667 sYES IF MMR1 EQUALS EXPECTED DATA 
9668 045216 012703 006771 MOV €6771,R3 sSETUP EXPECTED DATA FOR MARI 
9669 045222 012767 000001 135600 MOV #1,FLAG sSETUP FLAG FOR AN ABORT 
9670 045230 012757 000001 177572 MOV @1,80177572 s+ TURN MMU ON 
9671 045236 010767 135550 MOV R7,SLOCOO sSAVE PC 
9672 045242 114125 MOVB -(R1),CRS)> 100 A RELOCATION 
9673 045244 004767 000122 JSR PC,.1Si2 sCHECK IF AN ABORT OCCURRED AND IF 


YES IF MAR1 EQUALS EXPECTED DATA 


Fi4 
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9675 045250 012703 006411 MOV 06411,R3 sSETUP EXPECTED DATA FOR MARI 
9676 045254 012767 000001 135546 MOV 01,FLAG sSETUP FLAG FOR AN ABORT 
9677 045262 012737 000001 177572 MOV @1,00177572 ;TURN MMU ON 
Z 9678 045270 010767 135516 MOV R7,SLOCOO ;SAVE PC 
9679 045274 112125 MOVB  (Ri)+,(RS)> 300 A RELOCATION 
9680 045276 004767 000070 JSR PC,TS12 sCHECK IF AN ABORT OCCURRED AND IF 
9681 sYES IF MMR1 EQUALS EXPECTED para 
9682 045302 012703 171025 MOV #171025,R3 sSETUP EXPECTED DATA FOR PER 
9683 045306 012767 000001 135514 MOV @1,FLAG sSETUP FLAG FOR AN ABORT 
9684 045314 012737 000001 177572 MOV @1,00177572 TURN MMU ON 
Z 9685 045322 010767 135464 MOV R7, SLOCOO sSAVE PC 
9686 045326 012542 MOV (R5)+, -(R2) 300 A RELOCATION 
9687 045330 004767 000036 JSR PC, TS12 sCHECK IF AN ABORT OCCURRED AND IF 
988 sYES IF MARI EQUALS EXPECTED DATA 
9689 045334 012703 012762 MOV #12762 ,R3 sSETUP EXPECTED DATA FOR MARI 
9690 045340 012767 000001 135462 MOV #1, FLAG sSETUP FLAG FOR AN ABORT 
9691 045346 012737 000001 177572 MOV @1,80177572 ;TURN MMU ON 
Z 9692 045354 010767 135432 MOV R7, SLOCOO sSAVE PC 
9693 045360 01 MOV -(R2),(R5)> 300 A RELOCATION 
9694 045 004767 000004 JSR PC,TSi2 sCHECK IF AN ABORT OCCURRED AND IF 
$695 :YES IF MMR1 EQUALS EXPECTED DATA 
3697 045366 000167 000046 IME T12FIN 
t 
$699 ;ROUTINE TO CHECK IF AN ABORT OCCURRED AND IF MMR1 EQUALS EXPECTED DATA 
* 
9701 045372 022767 000000 135430 TS12: CMP @0,.FLAG s0ID AN ABORT OCCUR 
9702 045400 001401 18 sYES GO ON 
9703 045402 104002 ERROR +2 ;MMU 
9704 3NO GO TO ERROR 
9705 045404 020367 135434 1$: CMP R3, SAVMR1 ; TEST MMR1 FOR EXPECTED DATA 
9706 045410 001401 BEQ 2% 30K GO ON 
9707 045412 104002 ERROR +2 ;MMU ERROR 
9708 3NO GO TO ERROR 
9709 045414 026767 135372 135424 2%: CMP SLOCOO , SAVMR2 ; TEST MMR2 FOR EXPECTED DATA 
9710 645422 001401 BEQ 3$ 30K GO ON 
9711 045424 104002 ERROR +2 ;MMU ERROR 
9712 :NO GO TO ERROR 
9713 045426 005067 135412 38: CLR SAVMR1 ;CLEAR STATUS REG SAVE AREA 
9714 045432 005067 135410 CLR SAVMR2 ; 
9715 045436 000207 RTS PC ;RETURN 
’ 
9717 045440 000240 T12FIN: NOP 
9727 645442 TSMM13: 
9726 ’ ADDER RELOCATION TEST PART A 
9729 § § SSOHSSSSESSESSESSSSSSSSSSSESSSSSSHSSEHSEESEEESEHEEEEEEEESEEEEEES 
s(NEED 16 BITS OF MEMORY ADDRESSING) 
9730 045442 005037 177572 CLR 90177572 3MMU OFF 
9731 045446 005067 135356 CLR FLAG ;CLEAR MMU ABORT FLAG 
9732 045452 005037 177776 CLR 90177776 sINIT PSW 
9733 045456 004767 067404 JSR PC, MMU ;INIT MMU 
9734 045462 012737 000020 172516 MOV 020, 80172516 sINIT MMRS 
9735 045470 012703 045644 MOV @PARAD1 RS ;SETUP PARS WITH TEST VALUES 
9736 045474 012701 045676 MOV @PARVAL,R1 ; 
9737 045500 012133 18: MOV (R1)+,@(R3)> i 
9738 045502 021127 000333 CMP (R1), 0333 ’ 
9739 045506 001374 BNE 18 : 
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$795 045710 
9796 045712 


012703 
012701 


045762 
045730 


046014 
177776 
000001 


177572 


000111 


177776 


000027 
000001 


177572 


177572 


172516 
177572 


G14 
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MOV @PHY1,R3 
MOV @VIR1,R1 
MOV @M00E1 ,R2 
2s: MOV (R2)+,80177776 
MOV >, 
MOV #1,80177572 
MFPI @CR1)> 
MOV (SP)+,R4 
CLR 80177572 
CMP R5,R4 
BEQ S$ 
ERROR 2 
38: CMP (R3),@111 
BNE es 
INC R3 
INC R3 
INC R1 
INC R1 
INC Re 
INC Re 
MOV (R2)+, 80177776 
MOV @CR3)+ RS 
MOV @27 ,8@172516 
MOV @1,80177572 
MFPD @CR1)-+ 
MOV (SP )+,R4 
CLR 80177572 
CMP R5S,R4 
BEQ 4$ 
ERROR 2 
4$: 
JP TI3F IN 
3 
sADDER TEST PART A TABLES 
Hi 
PARAD1: .WORD 172240 
-WORD 177642 
. WORD 172252 
. WORD 177640 
. WORD 172242 
. WORD 172254 
. WORD 177652 
-WORD 177644 
. WORD 172246 
. WORD 177654 
. WORD 172250 
. WORD 177660 
-WORD 333 
PARVA1: .WORD 
-WORD 000010 
. WORD 177777 
. WORD 177601 
-WORD 000010 
. WORD 
.WORD 000070 


sSET POINTERS TO ADDER PART A 
s TEST TABLES. 


$ 
sINIT PSW 

— ey AT PHYSICAL ADDRESS 

: 

sSAVE DATA AT RELOCATED VIRTUAL ADDRESS 


F 
sTURN MMU OFF 

sIS DATA EQUAL TO EXPECTED 
sYES GO ON 


3MMU ERROR 
3NO IT IS AN ADDER ERROR 


sARE WE READY TO TEST DATA SPACE 
sNO GO TO 2% 

sPOINT TO DATA SPACE VALUES 

: 


b 

sINIT PSW 

sSAVE DATA AT PHYSICAL ADORESS 

sINIT MARS 

3; TURN MMU ON 

sSAVE DATA AT RELOCATED VIRTUAL ADORESS 
3POP THE STACK 


;TURN MMU OFF 
sIS DATA EQUAL TO EXPECTED 
sYES GO ON 


3MMU ERROR 
3NO I7 IS AN ADDER ERROR 


H1i4 
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SEQ 0176 


9797 045714 000010 Wren 000010 
9796 045716 000010 000010 
9799 045720 000060 .WORD 000060 
9800 045722 000000 -WORD 000000 
9601 045724 .WORD 000010 
9602 045726 000333 -WORD 333 
9603 045730 000000 VIR1: . WORD 
9804 045732 025000 . WORD 
9605 0457384 135224 -WORD 135224 
9606 045736 017700 -WORD 017700 
9807 045740 0 -WORD 033000 
9606 045742 145252 .WORD 145252 
9809 045744 121000 -WORD 121000 
9616 045746 043000 -WORD 043000 
9611 045750 075000 -WCORD 075000 
12 045752 .WORD 142000 

9613 045754 117700 -WORD 117700 
9614 045756 000111 -WORD ill 
9615 045760 7 -WORD 007000 
98616 045762 PHY1 -WORD 000000 
9617 045764 -WORD 006000 
96168 045766 015124 -WORD 015124 
9819 045770 . WORD 
9620 045772 014000 -WORD 014000 
9621 045774 012452 -WORD 012452 
9622 045776 010000 -WORD 010000 
9623 046000 . WORD 

046002 016000 -WORD 016000 
9625 046004 010000 -WORD 010000 

04600€ 017700 -WORD 017700 
9827 046010 000111 -WORD 111 
9626 046012 010000 -WORD 010000 
9629 046014 010000 MODE1: .WORD 010000 
9630 046016 030000 .WORD 030000 
9631 046020 010000 -WORD 010000 

046022 030000 -WORD 030000 
9633 046024 010000 -WORD 010000 
9634 046026 010000 -WORD 010000 
9635 046030 030000 -WORD 030000 
9636 046032 030000 -WORD 030000 
98637 046034 010000 .WORD 010000 
9638 046036 030000 -WORD 030000 
9639 046040 010000 -WORD 010000 
9840 045042 000111 -WORD 111 
9641 046044 0 -WORD O 
9842 3 
9643 046046 TASFIN: 
9854 046046 7$1622: 
98655 3 TEST 22/186 BIT ADDRESS OPTION 
9656 § J SOSSSSOSSSSSESSSSHESSEESSSSESESESSSSSSESEEEEESESESESESEEREEEEEEE 


sCHECK THE SOFTWARE SWITCH REGISTER TO DETERMINE IF THIS IS A 22 BIT OR AN 
+18 BIT “uy ¥ SYSTEM. BIT O68 IN THE SWR=1 INDICATES AN 18 BIT SYSTEM. 
sIF WE'RE IN A 22 BIT SYSTEM WE CAN PERFORM SOME EXTRA TESTS. 


9657 046046 032777 000400 1335064 BIT @BIT08 , BSUR sIS BIT O08 SET? 

9658 046054 001405 BEQ 100% sBRANCH IF ITS NOT 

9859 046056 062737 000001 901204 ADO #1, 80¢TESTN SKEEP TEST NUMBERS IN ORDER 

9860 sADD 1 FOR THE TESTS WE'RE SKIPPING 


& 


T14. 
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9861 046064 000167 001422 


013767 


00000 
131632 
177777 


131620 


001000 
177766 
046234 


006020 
170000 
177777 
177777 
131332 


000020 
046312 
131516 


010000 
177777 
131476 


131262 


134714 
134710 
000004 
000006 
124370 
124220 
131430 
140000 


124136 


124246 
131526 
124064 
140000 


JMP 


T14F IN 


sSKIP OVER THESE TES 


TS IF If IS 


; 
- THIS IS A 22 BIT SYSTEM CHECK THE 22/18 BIT ADDRESS OPTION 


@ 
onl 
~ 
Ho 


$ 
:IF 
322 
:IF 


18: 


2s: 


3%: 


3 
4$: 


; i 
w 


309883833 


~ 
—~ 


Ss 


BIT _———— 


. CLEAR ADORESS 0 
. WRITE ed. ay ADDRESS 17000000 WITH ALL ONES 


:T0 TEST 22 BIT ADDRESSING WE DO THE FOLLOWING: 
. ENABLE 22 MODE 


ADORESS 
gh oe Ry =O) OR A TIME OUT OCCURRED, IT INDICATES 


04 ,SLOCOO 
806 ,SLOCO1 
1% ,804 
0340 , 806 


#20, SR3 
#1700009 , KIPAR6 
~— 


#177777 ,8@140000 
0 


at 


2 3MMU 
@STBOT SP 


90177766 

03% 804 
#B1T04,SR3 
#170000 , KIPAR6 
#177777 ,80140000 
#177777 ,a00 

as 


SRO 


#81104 ,SR3 
o5%,4 


te) 
#10000 , KIPAR6 
eerrers .8@140000 


5% 
SRO 
+2 


sSAVE VECTOR 
sSAVE VECTOR 
sSET VECTOR FOR NXM 


°: 
S 0 #177777 IT INDICATES THAT 22 BIT MODE IS NOT FUNCTIONING. 


TRAP 


; 
sENABLE 22 BIT MODE ADDRESSING 


sSET +p FOR 1920- 
sENABLE MMU 


:CLEAR ADOR 0 


1924KW ADOR RANGE 


SEQ 0177 


sMOVE ALL ONES TO ADDR 17000000 VIA KIPARG6 


3A TIME OUT ERROR OR 


CLEAR INDICATES 


sADOR O REMAINING 
sTHAT 22 BIT ADORESS 


ING AND 


MODE IS WORK 
sTHAT SOME FURTHER TESTS SHOULD BE PERFORMED 


sIF ADOR O #177777 


sERROR! 22 BIT ADDRESS MODE BAD 


:;GOT HERE AS A RESUL 
CLEAN UP THE STACK 
CPU ERROR REG 


sBE ASSERTED IF 22 B 
STRY TO WRITE ADOR 1 
sADOR O SHOULD = 177 


T OF NXM TRAP--- 
ISTER 


IT ADR WAS ENABLED 
777. 


:0R ADOR O = ZERO INDICATES AN ERROR 


sGO TO NEXT TEST IF 
sOISABLE MMU BEF 


ADOR 0177777 


ORE ERROR. 
sERROR! 18 BIT ADOR OPTION IS N.G. 
+2 sMMU ERROR 


: 
sTEST ADORESS BITS 18 THRU 21 


sENABLE 22 BIT 7 


SSING MODE 


ONES TO ADOR 1000000 


ANCH ADORE 
sOISABLE MMU BEFORE ERROR 


3MMU E 
sERROR! BIT 18 DID NOT ASSERT 


a _—— a eee ee ee -  esCie ss 


J14 
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MEMORY MANAGEIENT TESTS 
9918 046312 12737 046354 000004 5%: MOV 06% , 804 sSET UP FOR NXM TRAP | 
9919 046320 005067 131454 CLR 0 sCLEAR ADDR O 
9920 046324 012767 020000 124022 MOV #20000 , KIPAR6 sTEST ADORESS BIT 19 
9921 046332 012737 177777 140000 MOV #177777 , 80140000 sWRITE ALL ONES TO ADDR 2000000 
9922 046340 005767 131434 TST 0 sTEST ADDR 0. SHOULD= ZERO 
9923 046344 001403 BEQ 6% sBRANCH IF ADDRESS 0-0 
9924 946346 005067 131220 CLR SRO s;OISABLE MMU BEFORE ERROR 
9925 046552 104002 ERROR +2 MMU ERROR 
9926 SERROR ! BIT 19 DID NOT ASSERT 
9927 046354 012737 046416 000004 6%: MOV 67% ,904 sSET UP FOR NXM TRAP 
9928 046362 005067 131412 CLR 0 sCLEAR ADOR O 
9929 046366 012767 040000 123760 MOV #40000 , KIPAR6 STEST ADDRESS BIT 20 
9930 046374 012737 177777 140000 MOV #177777 , 80140000 sWRITE ALL ONES TO ADDR 4000000 
9931 046402 005767 131572 TST 0 sTEST ADOR 0. SHOULD =-0 
9932 046406 001403 BEQ 7$ sBRANCH IF ADDRESS 0 =0 
9933 046410 005067 131156 CLR SRO sOISABLE MU BEFORE ERROR 
9934 046414 104002 ERROR +2 
9935 ERROR | BIT 20 DID 4 ASSERT 
9936 046416 012737 046460 000004 7%: MOV 06% , 804 sSET UP FOR NXM 
9937 046424 005067 151350 CLR 0 sCLEAR ADORESS 0 
9938 046430 012767 100000 123716 MOV #100000 , KIPAR6 sTEST ADORESS BIT 21 
9939 046436 012737 177777 140000 MOV #177777 , 80140000 sWRITE ALL ONES AT ADDR 10000000 
9940 046444 005767 1313350 TST 0 sCHECK ADORESS > SHOULD = 0 
9941 046450 001403 BEQ 8$ sBRANCH IF ADDR O = 0 
9942 046452 005067 131114 CLR SRO sDISABLE MMU BEFORE ERROR 
9943 046456 104002 ERROR +2 3MMU 
W944 sERROR! ADOR BIT 2 DID NOT ASSERT 
9945 046460 005067 1531106 83: CLR SRO sDISABLE MU 
9946 046464 005037 177766 CLR 90177766 sCLEAR CPU ERROR REGISTER 
9947 046470 012706 001000 MOV @STBOT ,R6 ;RESET STACK POINTER 
9948 046474 013737 003012 000004 MOV @0SLOCOO0 , 804 sRESTORE VECTORS 
9949 046502 013737 003014 000006 MOV @0SL0CO1 , 866 ’ 
9959 046510 TSMM14: 
9960 F ADDER RELOCATION TEST PART B 
9961 § §OO600000000060000000000600800050080008 FESS SSEESSEESEESSEEt EES 
s(NEED 22 BITS OF MEMORY ADDRESSING) 
9962 046510 005037 177572 CLR BO5R0 3s TURN OFF 
9963 046514 005067 131246 CLR CPEREG sCLEAR THE mCPU ERROR a 
9964 046520 013737 000004 005012 MOV 964 , 8@SLOCOO sSAVE LOC 4 IN SLOCOO 
9965 046526 013737 000006 003014 MOV 806 ,@@SLOCO1 sSAVE LOC 6 SLOCO 
9966 046534 012737 047224 000004 MOV 804 3SET UP FOR TIMEOUT TRAP 
9967 046542 012737 000340 000006 MOV #340 , 806 3SET UP FOR TIMEOUT TRAP 
9968 046550 005037 172340 CLR @eKIPARO 3;SET KER PARO FOR 1ST 4KW Of MEMORY 
9969 046554 012767 077406 123516 MOV 077406 ,KIPDRO sSET KER POR FOR 4KW R/W ACCESS. 
9970 046562 012737 177500 172354 MOV #177500 , BOK IPARG sSET UP KERNEL PAGE ADOR REG 6 
9971 sFOR HIGHEST 4K WORDS OF NON-I/0 
9972 sFOR 2 MEG WORDS OF MEMORY. 
9973 046570 012767 077406 123516 MOV 077406 , KIPOR6 :SET KER POR6 FOR 4KW R/W ACCESS. 
9974 046576 012737 000020 172516 MOV 020 , B@SR3 sENABLE 22 BIT ADDRESSING. 
9975 046604 012737 000001 177572 MOV #1,8@SRO sTURN ON THE MMU 
9976 046612 005737 157776 TST 90157776 sATTEMPT TO ADORESS LAST MEMORY ADDR. 
9977 peoeeseesesesesWILL TRAP TO 4 IF 2 MEG WORDS OF MEMORY NOT AVAILABLE ssssseoss 
9978 046616 013737 003012 000004 MOV @SLOCOO ,, 864 sRESTORE LOC 4 
9979 046624 013737 003014 000006 MOV 86SL0CO1, 806 sRESTORE LOC 6 
9960 046632 005037 177572 CLR 90177572 


sMMU OFF 
996i 046636 005037 003030 CLR @OF LAG :CLEAR MMU ABORT FLAG 





COKDACO KDJ11-B8 CLUSTER DIAG. 


MEMORY MANAGEMENT TESTS 


36 
10037 047110 
38 


000167 


000376 
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177776 


172516 


177572 


172516 


1s: 


2s; 


4$: 


n88% 


38338 


T 


=z 
v 
He 


4 g533 


EEPELPEEEL F 


rz 
% 


PC, MMU 

#10000 , 80177776 
#20 ,@@172516 
#1000 , 00177746 
@PARVAS ,R4 
@VIRS,R1 

(R4)+ , 801 72246 
#1,80177572 


90177572 
+ ), #333 


027 ,8@172516 
(R4)+, 80177776 
#52525, -( SP) 


#1,80177572 
@(R1)+ 
86177572 
620, oon 1256 


80172516 
PC,7TS14 


T14FIN 


K14 


PAGE 7-161 


ERROR 
sNOT —" GO TO ERROR 


3 
s TURN CACHE TEST FEATURE ON 
sSET POINTERS TO INIT TABLES 


° 
sINIT SIPARS 
3 TURN MMU ON 

sPUSH BACKGROUND DATA ON TO THE STACK 
;WRITE DATA TO PHYSICAL ADDRESS 

sWRITE DATA AT PHYSICAL ADDRESS TO STACK 
sIS DATA EQUAL TO EXPECTED 

sYES GO ON 

3; TURN MMU OFF 


3TURN MMU OFF 

sARE WE — 

3sNO GO TO 1 

SET POINTERS TO PAR INIT TABLES 


GO TO 3% 
sSET POINTERS TO ADDER PART B TABLES 
; 


3 

sWRITE DATA TO PHYSICAL ADDRESS AND THEN 
;CHECK IF DATA AT PHYSICAL ADORESS IS 
;EQUAL TO EXPECTED AND IF NOT DETERMINE 
sIF IT IS AN ADDER ERROR OR A MEMORY ERROR 
sHAVE WE DONE ALL THE 22 BIT MODE I SPACE 
3;CASES 

sNO GO TO 4 

sPOINT TO 22 BIT MODE D SPACE CASE 

3 

3 


F 
;INIT MMRS 

sINIT PSW 

sPUSH DATA ONTO STACK 

3TURN MMU ON 

sWRITE DATA TO PHYSICAL ADDRESS 
;TURN MMU OFF 

sINIT MMRS 

3;CHECK IF DATA AT PHYSICAL ADDRESS IS EQUAL 
:T0 EXPECTED AND IF NOT DETERMINE IF IT 
3IS AN ADDER ERROR OR A MEMORY ERROR 
NINIT MMRS FOR 18 BIT MODE 

sWRITE DATA TO PHYSICAL ADDRESS AND THEN 
sCHECK IF DATA AT PHYSICAL ADORESS IS 
sEQUAL TO EXPECTED AND IF NOT DETERMINE IF 
sIT IS AN ADDER ERROR OR A MEMORY ERROR 


COKDACO KDJ11-8 CLUSTER 
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10061 
0062 


DIAG. 


177776 
000001 


177572 


177572 


177572 


177776 
177572 


“L14 
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sROUTINE TO WRITE DATA TO PHYSICAL ADDRESS AND TO CHECK IF DATA AT 
sPHYSICAL ADORESS IS EQUAL TO EXPECTED AND IF NOT DETERMINE IF IT IS 


sAN ADDER ERROR OR A MEMORY ERROR 


3 
TS14: 


MOV (R4)+, 80177776 sINIT PSW 
MOV #1,80177572 ;TURN MMU ON 
MOV #52525. - ) sWRITE DATA ONTO STACK 
MTPI @CR1)>+ sWRITE DATA TO PHYSICAL ADDRESS VIA STACK 
CLR 80177572 3 TURN MMU OFF 
T14: MOV #10000 ,80177776 sINIT PSW 
MOV CR2)+ , 80172246 sINIT SIPARS 
MOV #1,80177572 3; TURN MMU ON 
MFPI @0(R3) 300 RELOCATION 
CMP #52525 ,,(SP)+ sIS DATA EQUAL TO EXPECTED 
BEQ 2s sYES GO ON 
MFPI @0(R3) sWHAT TYPE OF ERROR IS IT 
CMP —— (SP )-« 3 
BEQ 3 
ERROR 1» 3;MMU ERROR 
;IT IS A MEMORY ERROR 
BR 2s 3 
1%: ERROR +2 ;MMU ERROR 
sIT IS AN ADDER ERROR 
2s: CLR 90177572 ;TURN MMU OFF 
I RS 8 
INC R3 3 
RTS PC ;RETURN 
$ 
3;NON-EXISTANT MEMORY TRAP ROUTINE 
3 
NXMTRP: CLR @@SRO 3; TURN OFF 
MOV @T14F IN, (SP) 3SET UP STACK. “WITH RETURN ADOR. 
MOV @@SL0CO0,, 864 | RESTORE LOC 4 
MOV 9@SL0CO1 , 866 sRESTORE LOC 6 
CLR 90177766 ;CLEAR TIME OUT INDICATION FROM 
;CPU ERROR REGISTER 
RTT sRETURN FROM TRAP; Go TO NEXT TEST. 
3 
s;ADDER TEST PART B TABLES 
3 
PARAD2: .WORD 177646 
-WORD 177650 
-WORD 177652 
-WORD 172240 
-WORD 177640 
-WORD 17764¢ 
-WORD 172244 
-WORD 177644 
-WORD 172252 
-WORD 172352 
-WORD 177662 
-WORD 172242 
-WORD 333 
PARVA2: .WORD 157700 
-WORD 137700 
.WORD 077700 
. WORD 176777 





10151 047476 
10152 047500 
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VIR2: 


PARVAS: 


VIR3: 


SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSNNSO0N9S 
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ee oe ee ee} — oe ae Ce 


N14 
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10153 047502 


9 
10160 047512 


000333 


130214 
30220 
157776 


000040 


047562 


130174 


130150 


177776 


SEQ 0182 
-WORD 060000 
-WORD 060000 
-WORD 060000 
-WORD 333 
; 
T14F IN: 
; TEST NON-EXISTANT MEMORY TRAP 
j sPSSSOSSSERERESESSESESESEEEERESESESESESEEEEEESESESESESESESESESES 
3WE ARE ASSUMING THAT THE NON-EXISTANT MEMORY eae OUT 
sFEATURE IS WORKING SINCE WE CAN'T GUARANTEE T' 
sTHE SYSTEM BEING TESTED HAS A NON-EXISTANT MEMORY LOCATION. 
3AT THIS TIME WE WILL ATTEMPT TO TEST THE NXM FUNCTION 
JSR PC MMU sINIT THE MMU 
MOV #177400, BeKIPAR6 iSET KIPARG T TO RELOCATE TO HIGHEST MEMORY 
MOV 4,SLOCOO sSAVE VECTOR 
MOV 2.4 sLOAD VEC WITH ADOR OF TRAP HANDLER 
BIS @#6ITOO, SRO sTURN ON THE MMU 
CLR CPEREG CLEAR THE CPU EI ERROR REGISTER 
CLR PS CLEAR THE PSW 
TST 90157776 SACCESS PHYSICAL ADOR 17757776 
1$: BR NXMF IN sIF IT DOESN'T TRAP WE‘LL AS 


SUME 
sTHAT THIS IA A 4 MEGABYTE SYSTEM 
sAND GO TO THE NEXT TEST 


23; —_- :IS CPU ERROR REGISTER CORRECT? 
3 
ERROR +2 3 RROR 
3%: — + ates :IS CONTENTS OF STACK CORRECT? 
ERROR +2 3;MMU ERROR 
4$: CMP #),(SP)-+ 3IS CONTENTS OF STACK CORRECT? 
BEQ NXMF IN 3 
ERROR +2 ;MMU ERROR 
NXMFIN: CLR SRO 3; TURN OFF THE MMU 
CLR CPEREG ;CLEAR THE CPU ERROR REGISTER 
MOV SLOCOO ,4 sRESTORE THE VECTOR 
TSMM15: 
3 PAGE WRITTEN BIT TEST 
CLR 90177572 3MMU OFF 
CLR FLAG ;CLEAR MMU ABORT FLAG 
CLR 80177776 ;INIT PSW 
MOV 172300 ,R4 3SET POINTER TO KPORS 
JSR PC,.7S15 :00 RELOCATIONS AND TEST KIPORS + 
;PAGE WRITTEN BIT BEING SET AND I 
sNOT SET GO TO ERROR 
JSR Pc,715 300 RELOCATIONS AND TEST KDPORS FOR 


sPAGE WRITTEN BIT BEING SET AND IF NOT 
sSET © TO ERROR 


MOV #50000 , 80177776 sINIT PSW 
MOV #172200 ,R4 sSET POINTER TO SPORS 
JSR Pc, TS15 ;00 RELOCATIONS AND TEST SIPORS FOR 


sPAGE WRITTEN BIT BEING SET AND IF NOT 


10226 
0229 

10230 047734 
1 


10242 047764 


10276 050102 


004767 


005037 
012737 
012704 
004767 


004767 


005037 
012704 
004767 


012704 
004767 


012704 
004767 


000167 


022427 
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000136 


177776 


000110 


177776 
172300 
000152 


172200 
000142 


177600 
000132 


000154 


000002 
000027 


177572 
077506 


177776 


‘i 
& 


BIoS8se xs 3 


172516 
177572 18: 


2s: 


JSR 


38 38 


tt i 


P 
~ 
ui 


NOT 


Bis 
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Pc,715 


90177776 


#170000 , 80177776 


#177600 ,R4 
PC, TS15 


pc,715 


80177776 
#172300 ,R4 
PC,TiSA 


#172200 ,R4& 
TiSA 


#177600 ,R4 
PC,T1SA 


TISFIN 


Ri 

020 , 80172516 

@1,80177572 

CR1),(R1) 
775 


#20000 ,R1 
+ aaa 


sSET GO TO ERROR 

300 RELOCATIONS AND TEST SOPORS FOR 

sPAGE WRITTEN BIT BEING SET AND IF NOT 

sSET GO TO ERROR 

sINIT PSW TO A KNOWN STATE 

sINIT PSwW 

sSET POINTER TO UPDRS 

300 RELOCATIONS AND TEST UIPORS ©OR 

sPAGE WRITTEN BIT BEING SET AND IF 

sNOT SET GO TO ERROR 

300 RELOCATIONS AND TEST UDPORS FOR 

sPAGE WRITTEN BIT BEING SET AND IF NOT 

sSET GO TO ERROR 

sINIT PSW TO A KNOWN STATE 

sSET POINTER TO KPORS 

SEXPLICITLY WRITE TO KPORS AND TEST 

sFOR PAGE WRITTEN BIT BEING CLEARED 
NOT CLEARED GO TO ERROR 


8 IF 

sSET POINTER TO SPORS 

sEXPLICITLY WRITE TO SPORS AMD TEST 
sFOR PAGE WRITTEN BIT BEING CLEARED 
sAND IF NOT CLEARED GO TO ERROR 
3SET POINTER TO UPDRS 

sEXPLICITLY WRITE TO UPORS AND TEST 
sFOR PAGE WRITTEN BIT BEING CLEARED 
sAND IF NOT CLEARED GO TO ERROR 


OO RELOCATIONS AND TEST IPDRS FOR PAGE WRITTEN BIT BEING 
SET REPORT AN ERROR 


sSET POINTER TO VIRTUAL ADORESS 
sINIT MARS 

3; TURN MMU ON 

300 A RELOCATION 


3 TURN MMU OFF 
sIS DATA EQUAL TO EXPECTED 
30K GO ON 


3 ERROR 
sNO GO TO ERROR 


sPOINT TO NEXT VIRTUAL ADORESS 
sARE WE DONE 

sNO GO TO 18% 

3; RETURN 


$ 
sROUTINE TO DO RELOCATIONS AND TEST SPORS FOR PAGE WRITTEN BIT BEING SET 
sAND IF NOT SET REPORT AN ERROR 


$ 
T15: 


172516 
177572 18: 


Ri 
@2,R4 
027 ,80172516 


3SET POINTER TO VIRTUAL ADORESS 
sPOINT TO FIRST DPOR 

sINIT MMRS 

3 TURN MMU ON 

sPUSH DATA ONTO THE STACK 

100 A RELOCATION 

; TURN MMU OFF 

HIS DATA EQUAL TO EXPECTED 


SEQ 0183 





10335 050250 


C01401 
104002 
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020000 
160000 


077406 


O504 54 
7 


177776 


MACRO M1200 18-OCT-64 


172516 


000010 
172516 
177776 


000010 
172516 


172516 
177776 


177776 


ERROR 


2s: ADO 
CMP 


BNE 
RTS 


; 
sROUTINE TO EXPLICITLY WRITE TO PDORS AND TEST PAGE WRITTEN BIT FOR BEING 
sCLEARED AND IF NOT AN ERROR 


H 

TISA: CLR 

1%: MOV 
chp 
BEQ 
ERROR 

2%: INC 
Bee 
RTS 

TISFIN: 

a 

TSMM16: 

F 


CLR 


TSM16A; 


TSM168 : 


TSM16C: 


33338 #5588 ”™ gpSeeeesiees 


Cis 


16:38 PAGE 7-166 


Re 
(R4), CRO) 
~ poeta mae 


2 


TEST CSM (CALL SUPERVISOR MODE) 
CLR 90177572 


BOFLAG 
OTMMLGE ,R4 


PC Pew 
037 ,80172516 
90177776 


@TMM16C , 8010 
027 ,80172516 


#140000 , 80177776 


7014 
*2 


@TPM1160 , 8010 
027 ,80172516 
80177776 
7014 

*2 


037 ,80172516 
#40000, 
#700, 


+ tattle 
140000 , 86177776 
600 ,R6 


RROR 
sNO GO TO ERROR 


sPOINT TO NEXT VIRTUAL ADORESS 
ARE WE DONE 


’ 
sNO GO TO 1% 
sRE TURN 


CLEARED REPORT 


sCLEAR COUNTER 


s00 AN EXPLICIT WRITE TO POR 
sIS iy 5 EQUAL TO EXPECTED 


30K 
s4MU ERROR 
sNO GO TO ERROR 
s INCREMENT POINTER 
sARE WE DONE 
sNO GO TO 18 
3sRE TURN 


s ENABLE e CSM INSTRUCTION 
sSET PS TO KER MODE 

SAVE VECTORS 

H 


; 
sSETUP NEW VECTORS 
’ 


‘ 
3 TEST INSTRUCTION 


sf@% ERROR 

3GO TO ERROR IF 
sSETUP NEW VECTOR 
sOISABLE CSM INSTRUCTION 
ISET PS TO USER MODE 


s TEST INSYRUCTION 
s*U ERROR 
3G0 TO er IF NOT TRAPPED 


TEST INSTRUCTION 


3MMU ERROR 

:GC TO ERROR IF NOT TRAPPED 
sENABLE CSM INSTRUCTION 
sSET PS TO SUP MODE 
sINIT SUP SP 
3SET PS TO USER MODE 
s INIT USER SP 


SEQ 0184 


I 


COKDACO KDJ11-B CLUSTER DIAG. 
MEMORY MANAGEMENT TESTS 
10336 050354 012737 000014 
10337 050362 000277 
10338 050364 007024 
10339 050366 104002 


10340 
10341 050370 000167 000504 
342 


10351 050420 000167 177624 
10352 050424 042737 007777 
030090 


10358 

10359 050450 000167 177622 

10360 050454 042737 007777 
000000 

10367 050500 000167 177616 


10370 
10371 050510 000167 000364 
ok | 050514 022737 070017 


103868 050560 022627 156430 


10392 050579 022627 050366 


DiS 
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000010 MOV 14,8010 sSETUP NEW VECTOR 
scc sSET ALL CC BITS 
-WORD 7024 3 TEST INSTRUCTION 

TSM160: ERROR +2 sMMU_ ERROR 

sGO TO ERROR IF NOT TRAPPED 


Jp TM16A 
8 
3 
177776 TMM168: BIC 07777 ,@0177776 sCLEAR UNWANTED BITS 
177776 CMP @0, 80177776 iTS pS ——— 
BEQ 1% sYES GO ON 
ERROR +2 3;MMU ERROR 
sNO GO TO ERROR 
18: TST (SP )-+ sCLEAN UP STACK 
TST (SP )-+ 3 
JP TSM16A sCONTINUE TESTING 
177776  TeM16C: BIC ©7777, 90177776 sCLEAR UNWANTED BITS 
177776 CMP #30000 , 80177776 sIS PS CORRECT 
BEQ 1s sYES GO ON 
ERROR +2 3;U ERROR 
sNO GO TO ERROR 
1%: TST (SP )« sCLEAN UP STACK 
TST (SP )« F 
JP TSM168 sCONTINUE TESTING 
177776 TMM160: BIC php al sCLEAR UNWANTED BITS 
177776 CMP #0 ,80177776 11S PS CORRECT 
BEQ 1s sYES GO ON 
ERROR +2 3MMU ERROR 
sNO GO TO ERROR 
18: TST (SP )> sCLEAN UP STACK 
TST (SP )« 3 
Jp TSM16C sCONTINUE TESTING 
TMM16E: .WORD 156430 ; TEST LOCATION 
TMM16F: ERROR +2 MMU ERROR 
:GO TO ERROR IF DION’ T ABORT 
JP TM16A 
177776 TMMI6A: CMP #70017 80177776 3IS PS CORRECT 
BEQ 1% sYES GO ON 
ERROR +2 sMMU ERROR 
sNO GO TO ERROR 
1%: CMP R6, 0572 3IS SP CORRECT 
BEQ - sYES GO ON 
o 
sNO GO TO ERROR 
2s: CMP R4, OTMM1GE+2 3IS R4 CORRECT 
BEQ 3% sYES GO ON 
+2 sMMU ERROR 
:NO GO TO ERROR 
156430 3%: CMP BOTMM1GE , 0156430 sIS TEST LOCATION OK 
BEQ 4¢ sYES GO ON 
ERROR +2 sMMU ERROR 
sNO GO TO ERROR 
4$:; CMP (SP )+, #156430 3IS STACK CORRECT 
BEQ 5$ sYES GO ON 
ERROR +2 sh 
3NO GO TO ERROR 
5%: CMP (SP)+, @TSM16D 1IS STACK CORRECT 


E15 
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SEQ 0186 
MEMORY MANAGEMENT TESTS 
10393 050574 001401 BEG 68 YES GO ON 
10394 050576 104002 ERROR +2 MMU ERROR 
10395 1NO GO TO ERROR | 
10396 050600 022627 140000 6%: CMP (SP )+, 140000 1IS STACK CORRECT 
10397 050604 001401 BEQ 73 sYES GO ON 
10398 050606 104002 ERROR 02 MMU ERROR 
10399 NO GO TO ERROR 
10400 050610 012706 000700 7$: MOV #700 ,R6 ;RESTORE SUP SP 
10401 050614 012737 140000 177776 MOV @140000 , 86177776 :SET PS TO USER MODE 
10402 050622 020627 000600 CMP R6, 600 11S USER SP CORRECT 
10403 050626 001401 BEQ 8s sYES GO ON 
10404 050630 104002 ERROR +2 iMMU ERROR 
1 NO GO TO ERROR 
1 012767 077400 121340 8%: MOV #77400, SIPDRO ;SETUP SIPDRO TO ABORT 
10407 050640 012737 050506 000016 MOV OTHMIGF 8016 sSETUP VECTOR 
10408 050646 012737 000001 MOV 01, 80F LAG ;SETUP FLAG FOR AN ABORT 
050654 012737 000001 177572 MOV @1.90177572 ;TURN MMU ON 
10410 050662 010701 MOV R7.R1 ;SAVE OLD PC 
10411 050664 0070i4 .WORD 7014 + TEST INSTRUCTION 
050666 022737 000000 003030 che €0, SOF LAG ;0ID AN ABORT OCCUR 
10413 050674 001401 BEQ 98 sYES GO ON 
10414 050676 104002 ERROR +2 MMU ERROR 
10415 NO GO TO 
10416 050700 023701 003046 9%: fan BESAVMR2,R1 11S MMR2 CORRECT 
10417 050704 001401 BEQ 10$ 3 YES 
10418 050706 104002 ERROR +2 MMU ERROR 
10419 NO GO TO ERROR 
10420 050710 023727 003042 100041 10%: CHP BeSAVMRO, @100041 :IS MMRO CORRECT 
10421 050716 001401 BEQ 118 YES GO ON 
10422 050720 104002 ERROR +2 Meu 
10423 NO GO TO ERROR 
10424 050722 012737 000037 172516 11%: MOV 037, 90172516 ;ENABLE CSM 
10425 050730 012737 040000 177776 MOV €40000 , 80177776 ;SET PSW TO SUP 
10426 050736 012706 000700 MOV #700, R6 ;SETUP SUP SP 
10427 050742 012737 140000 1/7776 MOV #140000 , 80177776 ;SET PSW TO USE 
10428 050750 012706 000600 MOV #600 ,R6 ;SETUP USE SP 
10429 050754 012737 000014 000010 MOV #14,9010 ;SETUP NEW VECTOR 
10430 050762 012737 051004 000016 MOV @1S16, 9016 ;SETUP NEW VECTOR 
10431 050770 000277 SCC sSET ALL CC BITS 
10432 050772 007027 .WORD 7027 ;TEST INSTRUCTION 
10433 050774 045712 "WORD 45712 
10434 050776 104002 TS16A: ERROR +2 MMU ERROR 
1043 1GO TO ERROR IF DIDN'T TRAP 
10436 051000 000167 000074 JP TMi6A 
10437 051004 022737 070017 177776 1S16: CMP 070017, 80177776 :IS PSW CORRECT 
10438 051012 001401 BEQ 2008 YES GO ON 
10439 051014 104002 ERROR +2 
10441 051016 020627 000572 2008: CMP R6,@572 
10442 051022 001401 BEQ 2018 
1044s 051024 104002 ERROR +2 | 
10445 051026 022627 045712 2018: CMP (SP)+,@45712 | 
10446 051032 001401 BEQ 202% | 
10447 051034 104002 ERROR +2 


1 
10449 051036 022627 050776 202: CMP (SP)+,@TS16A 





10450 051042 
10451 051044 
104S2 


6 
10489 051120 
90 


10516 051216 


001401 
104002 
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140000 
000700 


140000 
000600 


177776 


003100 
003110 


F1S 
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177776 


BEQ 203% sYES GO ON 
ERROR +2 ; MMU 
sNO GO TO ERROR 
203%: CMP (SP )+, #140000 sIS STACK CORRECT 
BEQ 204% sYES GO ON 
ERROR 2 
sNO GO TO ERROR 
2043: MOV #700 ,R6 sRESTORE SUP SP 
MOV #140000, 90177776 sSET PSW TO USER MODE 
CMP R6 , €600 31S USER SP CORRECT 
BEQ TM16A sYES GO ON 
ERROR 2 
sNO GO TO 
TM16A: CLR 90177776 3SET PS TO KER MODE 
MOV (SP )+, 8016 sRESTORE VECTORS 
MOV CSP )+, 8014 $ 
MOV CSP )+,98010 F 


{ OOSSASSSESESSEESSEESSEESESSESESESEOEEESEEESSESESESEEESESESESESEOEESESSEEES 

.SBTTL FLOATING POINT TESTS 

§ SOSSSSSESSESSSESEEEEES FESSESENESEEEEEFEES SESSSEEEEEESEESESESEEESESESESEOSS 

F BEGIN FLOATING PCINT TESTING 

§ 9S66000003060600000566666SFSSSESSSSSSSS SE SESEEEEEEEESESEESEEEESESESESEEEES 

§ POSSSSSSSEESSSSSSESESEESSESSSS + SEREEESSEHSSESEEESEESESEEESESEEEESEEEEEEESS 
1: 

5 FPP REGISTER BIT TESTS 

§ SPSSOSSSSSSSSESSSSESSSSSESESEEESESEEEEESELEDEEEEEDEEESEEEEEEEEES 

sRS=FPP PO 

3R1=TEMPORARY COUNTER 

3R2°POINTER = EXPECTED DATA 


sR3=POINTER TO RECEIVED DATA 
Ss OUNTER 
MBT2: CLR sSETUP FPP ACC POINTER 
MOV @BTEXP ,R2 sPOINT TO TEST DATA 
MOV @BTRES RS sPOINT TO RECEIVED DATA 
MBT2A: CLRO 0 sSETUP FPP REGISTER VALUES 
are ~ aid sCLEAR EXPECTED VALUE 
BTGO:  CLROD ACO sSETUP FPP REGISTER VALUES 
CLRO ACi 
CLRO AC2 
CLRO ACS 
CLRO AC4 
CLRO ACS 
MOV R5,R1 sGET FPP AC NUMBER INTO R1 
MUL #14,R1 sALLOW 10 LOCATIONS FOR OPERATION 
ADO oR1 sSETUP JMP LOCATION 
JP (R1) 
MACO: LOO BTEXP ,ACO sLOAD TEST DATA INTO TEST REGISTER 
MACOA: STO ACO,.BTRES sSAVE TEST RESULT 
Jp MACE 1GET OUT 
MAC1: LOO BTEXP ,ACi sLOAD TEST DATA INTO TEST REGISTER 


sSAVE TEST RESULT 


$70 AC1,BTRES 
JePp MACE sGET OUT 


SEQ 0187 


ee ee — -_— 


G15 
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SEQ 0188 

FLOATING POINT TESTS 

10517 051222 172667 131652 MAC2: LOO BTEXP ,AC2 sLOAD TEST DATA INTU TEST REGISTER 

10518 051226 174267 131656 STO AC2 ,BTRES sSAVE TEST RESULT 

10519 95:2%2 000167 000044 Jp MACE sGET OUT 

10520 051236 172767 131656 MACS: LOO BTEXP , ACS sLOAD TEST DATA INTO TEST REGISTER 

10521 051242 174367 151642 STO AC3,BTRES sSAVE TEST RESULT 

10522 051246 000167 000050 JP MACE sGET OUT 

10523 051252 172467 131622 MAC4: LOD BTEXP , ACO 

10524 051256 174004 STO ACO, AC4 sLOAD TEST DATA INTO TEST REGISTER 

10525 051260 172404 LOO AC4 ACO sSAVE TEST RESULT 

10526 051262 000167 177719 we MACOA sGET OUT 

10527 051266 172467 131606 MACS: LOO BTEXP ,ACO sLOAD TEST DATA = TEST XFER REGISTER 

10528 051272 174005 STO ACO, ACS sLOAD TEST REGISTE 

10529 051274 172405 LOO ACS ACO sSTORE RESULT INTO. XFER FPP REGISTER 

10530 051276 000167 177674 JP MACOA 1GET OUT 

10531 051302 026767 131572 131600 MACE: CHP BTEXP ,BTRES 

19532 051310 001014 BNE BTER sBRANCH IF REGISTER ERROR 

10533 0513512 026767 131564 151572 CMP BTEXP+2 ,BTRES+2 

10534 051320 001010 BNE TER 

10535 051322 026767 131556 131564 a BTEXP +4 ,BTRES+4 

10536 051330 001004 BNE BTER 

10537 051332 026767 131559 131556 chp BTEXP +6 ,BTRES+6 

10538 051340 001401 BEQ mBTs 3GO0D RESULT 

10539 051342 104003 BTER: ERROR +3 sFPP ERROR 

10540 sFPP AC LOADED INCORRECTLY 

10541 sNOW VERIFY THE OTHER REGISTERS REMAINED ZERO 

10542 051344 MBT6: 

10543 051344 005001 CLR R1 sCLEAR TEMPORARY COUNTER 

10544 051346 005705 TST RS ’ RO UNDER TEST 

10545 051350 001411 BEQ MBT6A sBRANCH IF TEST ING 

10546 051352 020527 000004 RS, SEE IF ib 2 t FPP REGISTER >R4 

10547 05. 100006 MBT sSKIP RO T 

10548 051360 174067 131524 STO ACO,BTRES sSAVE AC TEST RESULT 

10549 051364 004767 000216 JSR R7 ,BTTST sVERIFY THAT CONTENTS REMAINED ZERO 

10550 051370 001401 BEQ MBT8A sBRANCH IF EXPECTED RESULT 

10551 051372 104003 ERROR +3 sFPP ERROR 

10552 sBAD ACO 

10553 051374 020527 000001 MBTSA; CMP RS, 01 sSEE IF Ri UNDER TEST 

10554 051400 001406 BEQ MBT68 sBRANCH IF ot UNDER TEST 

10555 051402 174167 131502 sto AC1,BTRES sSAVE AC TEST RESULT 

10556 051406 004767 000174 JSR R7,BTTST s VERIFY THAT CONTENTS REMAINED ZERO | 

10557 051412 001401 BEQ MB TSB sBRANCH IF GOOD 

10556 051414 104003 +3 sFPP ERROR 

10559 sBAD AC1 

10560 051416 020527 000002 MBT6B: CHP RS, 02 sSEE IF TESTING FPP REGISTER AC2 

10561 051422 001406 BEQ MBTSC sBRANCH IF R2 UNDER TEST 

10562 051424 174267 131460 sto AC2 .BTRES SAVE AC TEST RESULT 

10563 051430 004767 000152 JSR R7,BTTST sVERIFY THAT CONTENTS REMAINED ZERO 

10564 051434 001401 BEQ MBTSC sBRANCH IF GOOD 

10565 051436 104003 ERROR +3 sFPP ERROR 

10566 sBAD AC2 

10567 051440 020527 000003 MBT6C: CMP RS, 03 sSEE IF R3 UNDER TEST 

10568 051444 001406 BEQ MBT8O sBRANCH IF R3 UNDER TEST | 

10569 051446 174367 1531436 STO AC3,BTRES SAVE AC TEST RESULT 

10570 051452 004767 0001350 JSR R7,BTTST sVERIFY THAT CONTENTS REMAINED ZERO | 

10571 051456 001401 BEG MBT8D sBRANCH IF GOOD 

10572 051460 104003 ERROR +3 sFPP ERROR 

10573 sBAD ACS 


10574 051462 
10575 051466 
10576 051470 
10577 051472 
10578 051476 


10603 051574 


TESTS 


COKDACO KDJ11-8 CLUSTER DIAG. 
FLOATING POINT 


000004 


131412 
000104 


000005 


131366 
000060 


177776 


177326 


131276 
131272 
131266 
131262 


H15 
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MBT8D: CMP RS, 04 ;SEE IF R4 UNDER TEST 
BEQ MB TBE sBRANCH IF R4 UNDER TEST 
LOO AC4,ACO MOVE REGISTER CONTENT 
STO ACO, BTRES sSAVE AC TEST RESULT 
JSR R7,BTTST sVERIFY THAT CONTENTS REMAINED ZERO 
BEQ TBE sBRANCH IF GOOD 
ERROR +3 3FPP ERROR 
3B8AD AC4 
MBT6E: CMP RS, @5 sSEE IF RO UNDER TEST 
BEQ MBT6F sBRANCH IF RO UNDER TEST 
LOO ACO sMOVE REGISTER CONTENTS 
STO ACO,BTRES sSAVE AC TEST RESULT 
JSR R7,BTTST sVERIFY THAT CONTENTS REMAINED ZERO 
BEQ MBT6F sBRANCH IF GOOD 
+3 3FPP ERROR 
;BAD ACS 
MBTSF : Pe R4 s INCREMENT PATTERN COUNTER 
BIC @177776,R4 3; TEST FOR OOO /EVEN 
BEQ 8FG sBRANCH IF EVEN 
SEC 3SET CARRY FOR TEST PATTERN SHIFT 
MBTSFG: ROL (R2) sROTATE LSW OF TEST PATTERN 
ROL 2c(R2) sROTATE 2 WORD OF TEST PATTERN 
ROL 4(R2) sROTATE 3 WORD OF TEST PATTERN 
ROL 6(R2) sROTATE 4 WORD OF TEST PATTERN 
ecs MBTSI 3JUMP IF THROUGH WITH TEST PATTERN 
JP BTGO sCONTINUE WITH NEW TEST PATTERN 
MBT8I: INC RS 3GO TO NEXT REGISTER TEST 
CMP RS, 06 3SEE IF THROUGH TESTING 
BPL MBTE 3; JUMP IF THROUGH 
JP MBT2A s;CONTINUE TESTING WITH NEW PATTERN 
3 
3 
BTTST: TST BTRES sVERIFY CONTENTS AS ZERO 
BNE BTTSTE sEXIT IF NOT ZERO 
TST BTRES+2 sVERIFY CONTENTS AS ZERO 
BNE BTTSTE sEXIT IF NOT ZERO 
TST BTRES+4 sVERIFY CONTENTS AS ZERO 
BNE BTTSTE s;EXIT IF NOT ZERO 
TST BTRES+6 ;VERIFY CONTENTS AS ZERO 
BITSTE: RTS 7 3GO BACK TO CALLING ROUTINE 
3 
3 
MBTE 
MFACU; 
’ TEST UNIQUENESS OF FPP ACCUMULATORS 


js POSSOSSSSSSSSSSESSSSSSEEEEESESESESEEESESEDESEEEEEEEEEESEESEESS 

sTHIS TEST LOADS UNIQUE PATTERNS INTO EACH ACCUMULATOR SIMULTANEOUSLY. 

sR2°POINTER TO EXPECTED DATA 

sR3*POINTER TO RECEIVED DATA 
’ 


SEQ 0189 


COKDACO KDJ11-B8 CLUSTER DIAG. 
FLOATING POINT TESTS 


131114 
131120 
000216 


000154 
131100 
000176 


000134 
131060 
004567 000156 


000114 
131040 
000136 


000074 


131016 
004567 000114 


000052 


MFA: 


BFAC1: 


BFAC2: 


BFACS: 


BFAC4: 


BFACS: 


RS, SUBT 
BTEXP , ACO 
ot a 


BFAC1 
+3 


RS, ADOT 
ACS ,AC2 


:SETUP FPP ACC POINTER 


sPOINT TO YEST DATA 
sPOINT TO RECEIVED DATA 
sSETUP EXPECTED DATA 

‘ 

i; 


$ 

sMOVE DATA TEMPORARILY 

sPUT DATA INTO TEST REGISTER 
sSUBTRACT TEN FROM EACH EXPECTED DATA 
sMOVE DATA TEMPORARILY 

sMOVE DATA INTO TEST REGISTER 
sSUBTRACT 10 FROM TEST DATA WORDS 


3GET NEXT SET OF TEST DATAS 
sLOAD TEST REGISTER 
3sGET NEXT SET OF TEST WORDS 
sLOAD FINAL TEST REGISTER 
WALL REGISTER 7 eae UNIQUE TEST WORDS 
sSTORE ACO,RESUL 
sCHECK RESULT 
s;BRANCH IF GOOD 


3FPP ERROR 


sBAD ACO 


sUPDATE EXPECTED RESULT 
sSTORE AC1 RESULT 
CHECK RESULT 


sSTORE AC2 RE 


{GAD AC2 RESLUT 


sSAVE TEST RESULT 
CHECK RE 


sBAD ACS RESULT 


FPP ERROR 

;BAD AC4 RESULT 

sUPDATE EXPECTED RESULT 
sSAVE TEMPORARY COPY 


s UPDATE ove. tee RESULT 
VE TEMPORAR 





10696 052110 


10740 052310 
10741 


10742 
10743 052314 
10744 


10 326 
10749 052330 
10750 

10751 052332 


10756 052336 


TESTS 


COKDACO KDJ11-8 CLUSTER DIAG. 
FLOATING POINT 


130774 
000072 


135370 
147757 
0000 


BFB: 


TSFP1: 
3 


STO AC2,BTRES 
JSR RS BFA 


sMOVE ACS RESULT 
sCHECK RESULT 
sBRANCH IF GOOD 


sBAD ACS RESULT 


BEQ BF AE 
ERROR 3 3;FPP 
BR BF AE 
#10, BTEXP 
SuB #10, BTEXP+2 
SUB #10, BTEXP+4 
SUB #10 ,.BTEXP +6 
RTS RS 
ADO #10,BTEXP 
ADO #10, BTEXP+2 
ADD #10, .BTEXP +4 
ADO #10 .BTEXP +6 
RTS RS 
CMP BTEXP ,BTRES 
BNE 
CMP BTEXP+2,BTRES+2 
BNE BFB 
cee BIEXP +4 ,2TRES+4 
CMP BTEXP+6,BTRES+6 
RTS RS 


TEST LOFPS AND STFPS MODE 0 
BOTRPFLG 


CLR 
MOV #147757 ,R4 
JSR .LOST 
MOV #105252 ,R4 
JSR PC,LOST 
MOV »R4 
JSR PC,LOST 
CLR R4 
JSR PC,LOST 
JMP FINI 
LOFPS R4 
STFPS Ri 

R4,R1 
BEG 1$ 
ERROR +3 
RTS PC 
NOP 


sEXIT MODULE 
sUPDATE EXPECTED CONTENTS 


sUPDATE EXPECTED CONTENTS 
sUPDATE EXPECTED CONTENTS 


sUPDATE EXPECTED CONTENTS 
; 


sVERIFY CONTENTS 
ZE 


ZERO 
sVERIFY CONTENTS 
GO BACK TO CALLING ROUTINE 


sCLEAR TRAP FLAG 
sSETUP DATA TO BE LOADED 
sLOAD AND STORE FPS WITH DATA 
:SETUP DATA TO BE LOADED 
;LOAD AND STORE FPS WITH DATA 
sSETUP DATA TO BE LOADED 
sLOAD AND STORE FPS WITH DATA 
SETUP DATA TO BE LOADED 
sLOAD AND STORE FPS WITH DATA 


sLOAD FPS WITH DATA 

sLOAD R1 WITH (FPS) 

;D0ID THE INSTRUCTIONS WORK 
S GO ON 


SEQ 0191 


KIS 
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ERROR 
10602 052470 012704 000100 2s: MOV a te TO BE LOADED 


SEQ 0192 
FLOATING POINT TESTS 
| 

10757 3 TEST CFCC 

10758 052336 005037 135370 CLR QeOTRPFLG sCLEAR TRAP FLAG 

10759 052342 012704 000017 MOV #17,R4 ;SETUP DATA TO BE LOADED 

10760 052346 004767 000032 JSR PC, TSF2 sLOAD FPS AND COPY CONDITION CODES TO PS 

10761 052352 012704 000012 MOV #12,R4 sSETUP DATA TO BE LOADED 

10762 052356 004767 000022 JSR PC, TSF2 sLOAD FPS AND COPY CONDITION CODES TO PS 

10763 052362 012704 000005 MOV @5,R4 sSETUP DATA TO BE L 

10764 052366 004767 000012 JSR PC, TSFe2 3LOAD FPS AND copy CONDITION CODES TO PS 

10765 052372 005004 CLR RG }SETUP DATA TO BE LOADED 

10766 052374 004767 000004 JSR PC, TSF2 sLOAD FPS AND COPY CONDITION CODES TO PS 

10767 

10768 3 

dss4 052400 000167 000024 JMP FIN2 

1 3 

10771 052404 170104 TSFe: LOFPS R4 3LOAD FPS 

10772 052406 170000 CFCC sCOPY a ne CODES TO PS 

10773 052410 013701 177776 MOV 90177776,R1 sSAVE P' 

10774 052414 042701 177760 BIC #177760,R1 3;MASK OUT TTpaaarTeD BITS 

10775 052420 020401 CMP R4,R1 ;WAS CONDITION CODE BITS ;°ANSFERRED 

10776 sCORRECTLY 

10777 052422 001401 BEQ 1$ 3YES GO ON 

10778 052424 104003 ERROR 3 3FPP ERROR 

10779 sNO GO TO ERROR 

10780 052426 000207 1$: RTS PC sRETURN 

10781 052430 FIN2: 

10782 3 

10785 052430 TSFPS3: 

10786 3 TEST SETF, SETD, SETI, SETL 

10787 052430 005037 135370 CLR SeTRPFLG ;CLEAR TRAP FLAG 

10788 052434 012704 000200 MOV #200 ,R4 ;SETUP DATA TO BE LOADED 

10789 052440 170104 LOFPS R4 ;LOAD FPS 

0790 170001 TF sMAKE FD=0 

10791 052444 170201 STFPS Rl sSTORE FPS 

10792 052446 020127 000000 R1,00 31S FD=0 

10793 052452 001401 BEQ 1$ sYES GO ON 

10794 052454 104003 ERROR 3 3FPP ERROR 

10795 sNO GO TO ERROR 

10796 052456 170011 1%: SETOD sMAKE FD=1 

10797 052460 170201 STFPS sSTORE FPS 

10796 052462 020104 R1,R4 3IS FO=1 

10799 052464 001401 BEQ sYES GO ON 

10600 052466 104003 ERROR 3 3;FPP ERROR 

10601 3NO GO TO | 





415° 
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SEQ 0193 
FLOATING POINT TESTS | 
10816 052524 4$: 
10617 3 
10820 052524 TSFP4: 
10621 3 TEST ILLEGAL OP CODES AND STST 
108622 052524 005037 135370 CLR SeTRPFLG s;CLEAR TRAP FLAG Pa 
10823 052530 012705 170003 MOV #170003 ,R5 sINIT OP CODE 
1 052534 013746 000244 MOV 90244 , -(SP) sSAVE FP VECTOR 
10825 052540 012737 052670 000244 MOV #ILLOP1 ,9@244 sSETUP NEW VECTOR 
1 052546 013746 000004 MOV 004, -( SP) sSAVE TIME OUT VECTOR 
10627 052552 012737 052740 000004 MOV @TIMEOU, 804 sSETUP NEW VECT 
10626 052560 013746 000010 MOV 8010, -(SP) sSAVE ILLEGAL VECTOR 
052564 012737 052744 000010 MOV #ILLOP2, 8010 ;SETUP NEW VECTOR 
10630 052572 01: CLR R3 $ 
10631 052574 170103 LOFPS R35 ;CLEAR FPS 
10632 052576 CLR Re $ 
10633 052600 010537 052604 MOV RS ,ae02 sSETUP THE ILLEGAL INST 
10634 052604 D2: . WORD 3 
1 052606 170000 03: CFCC sMEMORY WORDS TO BE USED WITH 
10636 052610 INC R2 sEXECUTION OF ILLEGAL OP CODE 
108637 052612 NC R2 3 
0638 052614 170201 STFPS Ri sSAVE FPS 
10639 052616 104003 RROR +3 3;FPP ERROR 
:GO TO ERROR 
108641 052620 022705 170010 D4: CMP #170010,R5 sCOMPUTE NEXT OP CODE 
1 052624 001003 BNE 5 3 
10643 052626 012705 170013 MOV #170013,R5 : 
1 052632 000757 BR 01 3 
108645 052634 022705 170077 DS: CMP #170077 ,RS ; 
052640 001001 BNE 06 3 
108647 052642 BR 07 $ 
052644 06: INC RS 3 
108649 052646 000751 BR 01 3 
10650 052650 012637 000010 07: MOV (SP)+,8010 sRESTORE VECTORS 
10651 052654 012637 000004 MOV +, 3 
10652 012637 000244 MOV (SP )+, 80244 3 
10653 
10854 ; 
ee 052664 000167 000060 JUMP FING 
3 
10857 052670 022716 052606 ILLOP1: CMP #03,(SP) s0ID TRAP OCCUR ON TEST INST 
10658 052674 001401 BEQ 18 sYES GO ON 
108659 052676 104003 ERROR +3 
1 sNO GO TO ERROR 
10861 052700 1$: (SP )+,CSP)-+ sCLEAN UP STACK 
10862 052702 170201 STFPS Ri sSTORE FPS 
108663 052704 022701 100000 CMP #100000 ,R1 3IS FPS CORRECT 
10664 052710 001401 BEQ 2s sYES GO ON 
poe 052712 104003 ERROR +3 3;FPP YT enna 
108667 052714 2s: CLR R4 sINT R4 TO A KNOWN STATE 
10668 052716 170304 STST R4 sSTORE FEC AT R4 
10869 3IF THE DESTINATION MODE IS IMPROPERLY 
10870 sDECODED AN ODD ADDRESS TRAP TO 4 
10871 sSHOULD OCCUR 
10872 052720 022704 000002 CMP 62,R4 sIS FEC CORRECT 
10873 052724 001002 BNE 3% 3NO GO TO ERROR 
108674 052726 000167 177666 JMP 04 sYES GO ON 





FLOATING POINT 
10875 052732 
10876 
10877 052734 
10676 
10879 052740 


10880 
10881 052742 


10933 053100 
10934 
10935 053102 


TESTS 
104003 
000167 


012701 


177660 


135370 
000244 
053034 
040000 


140000 


135370 


000004 
053210 
053200 
053200 


053170 





3$; 


; 
TIMEOU: 


1%: 


ERROR 
JMP 
ERROR 


+3 


+3 


TEST FID CINTERRUPT DISABLE BIT) 
SeTRPFLG 


~ M15 ae 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 7-176 


3FPP ERROR 
:GO TO ERROR 

3 THEN GO ON 
sFPP ERROR 


sERROR BECAUSE OF TRAP TO 4 
sRE TURN 


;FPP ERROR 
sERROR eo OF TRAP TO 10 
: 


sCLEAR TRAP FLAG 
sSAVE FP VECTOR 


;ILLEGAL FP INSTRUCTION 
sSEE IF ERROR WAS RECORDED IN FPS 


: 

;YES GO ON 
3FPP ERROR 
:NO GO TO ERROR 

;SEE IF FEC=2 


3 
;YES GO ON 

3FPP ERROR 

;NO GO TO ERROR 
;RESTORE VECTOR 


3FPP ERROR 
3FID ERROR 
;RETURN 


.» STO FSRC AND FOST MODE 1 


CLR T 

MOV 90244, -(SP) 
MOV @ILL ,80244 
MOV oR3 
LOFPS R3 

.WORD 170020 
CFCC 

STFPS 1 

CMP #140000 ,R1 
BEQ 1$ 

ERROR +3 

STST RS 

CMP @2,R4 

BEQ 2% 

ERROR +3 

MOV (SP )+, 80244 
JMP FINS 

ERROR +3 

RTT 

TEST LOD 

CLR @eTRPFLG 
CLR R4 

LOFPS R4 

SETD 

MOV BO4 .” ¢ SP ) 
MOV OTSF6, 204 
MOV @TSEDAT ,R4 
LOO (R4),ACO 
CMP R4, @TS6DAT 
BEQ 1$ 

ERROR +3 

MOV @TS6DA,R1 


;CLEAR TRAP FLAG 
sSETUP TO LOAD DATA 
;CLEAR FPS 
;SET FD TO 1 
3 SAVE TIMEOUT VECTOR 
sSETUP NEW VECTOR 
;SETUP POINTER TO DATA 
: TEST INSTRUCTION 
sIS R4 CORRECT 
sYES GO ON 

3FPP ERROR 

3NO GO TO ERROR 

;SETUP POINTER TO DATA 





10936 053106 


10971 053212 
10972 053214 
10973 

10976 053214 
10977 

109786 053214 
10979 053220 


TESTS 
012703 
2421 


000167 
177777 
000000 
052525 
125252 
177777 


000024 


135370 
000200 
000004 
053400 
053404 


053414 


2s: 


3$: 


NiS a 
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FLOATING POINT 


04 ,R3 
CR4)+,CR1)¢ 
3$ 

+3 


R3,2$% 
@TSTLOC ,R4 


#TS6DA ,R1 
04 ,R3 
(R4)+,CR1)+ 
6% 

+3 

R3,5$ 

(SP )+, 2804 
FING 

177777 


OTSF7 004 
@TS7DA1 ,R4 
CR4),ACO 
@TS7D0A2,R1 
(R1),ACL 
AC1,ACO 
@TSTLOC ,.R4 
AC1,(R4) 
PC ,CHECK7 
@TSTLOC ,R4 
TDA? ,R 





s INIT COUNTER 
sWAS SOURCE DATA ALTERED 
$ GO ON 
3;FPP ERROR 
;YES GO TO ERROR 
;ARE WE DONE 
;SETUP POINTER FOR DATA 
3; TEST INSTRUCTION 
3IS R4 CORRECT 
:YES GO ON 
3FPP ERROR 
;NO GO TO ERROR 
;SETUP POINTER TO DATA 
sINIT COUNTER 
sIS DESTINATION DATA CORRECT 
sYES GO ON ° 
3FPP ERROR 
;NO GO TO ERROR 


sARE WE DONE 
sRESTORE VECTOR 


sSAVE TIMEOUT VECTOR 
sSETUP NEW VECTOR 
sSETUP POINTER TO DATA 
sCLEAR ACO 

;SETUP POINTER TO DATA 
sLOAD AC1 WITH DATA 

; TEST INSTRUCTION 


; 
;CHECK IF AC1 HAS BEEN ALTERED 
; 


s;SETUP POINTERS FOR DATA 


CHECK IF ACO RECEIVED CORRECT DATA 
; 





11053 053502 


COKDACO KDJ11-8 CLUSTER 
FLOATING POINT 


TESTS 


012701 
172511 


174114 


B16 


DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 7-178 
SEQ 0196 
053404 MOV @TS7DA1,R1 sSETUP POINTER TO DATA 
LOO (R1),AC1 ;CLEAR _ 
SETF sSET FO*0 
LOF AC1i,ACO s TEST INSTRUCTION 
SETD 3SET FDe 
003162 MOV @TSTLOC ,R4 sSETUP POINTER TO DATA 
STO ACI. (R4) sCHECK IF AC] HAS BEEN ALTERED 
000026 JSR PC ,CHECK7 5 
053424 MOV @TS7DA4, ir sSETUP POINTERS FOR DATA 
003162 MOV @TSTLOC Ri 5 
STO ACO,(R1) s;CHECK IF ACO HAS CORRECT DATA 
000010 JSR PC ,CHECK7 F 
MOV (SP )+, 804 sRESTORE VECTOR 
3 
000052 JP FIN? 
000004 CHECK7: MOV 04 RS sINIT COUNTER 
CHEK7: CMP (R4)+,CR1)> sIS DATA OK 
BEQ CHK7 sYES GO ON 
ERROR +3 3FPP ERRCR 
3NO GO TO ERROR 
CHK7: $08 R3,CHEK7 sARE WE DONE 
RTS PC sYES RETURN 
3 
TSF7: ERROR 3 3FPP ERROR 
:000 ADORESS TRAP 
RTT ;RE TURN 
TS7DA1: .WORD 0 
.WORD O 
. WORD 0 
-WORD O 
TS7D0A2: .WORD 37641 
-WORD 65121 
-WORD 37373 
-WORD 22265 
TS70A4; .WORD 
. WORD 
-WORD 37373 
-WORD 22265 
FIN?: 
SFP10 
; TEST STO, STF FOST MODE O 
135370 BeTRPFL sCLEAR TRAP FLAG 
000200 MOV @200 ,R4 sSETUP TO LOAD FPS 
LOFPS R4 sLOAD FPS, FD=1 
000004 MOV @04, -(SP 3 SAVE TIMEOUT VECTOR 
053620 000004 MOV @TSF10,804 sSETUP NEW VECTOR 
053624 MOV @7S$1001 ,R4 sSETUP POINTER TO DATA 
LOO (R4), ACO sCLEAR ACO 
053634 MOV #781002 ,R1 sSETUP POINTER TO DATA 
LOO (R1),AC1 3LOAD ACL WITH DATA 
ST AC1,ACO 3 TEST INSTRUCTION 
003162 MOV @TSTLOC ,R4 


STO AC1,(R4) 


3 , 
sCHECK IF AC1 WAS BEEN ALTERED 


Se 


C16 


COKDACO KDJ11-B8 CLUSTER DIAG. MACRO M1200 10-OCT-84 16:38 PAGE 7-179 


SEQ 0197 
FLOATING POINT TESTS 
11054 053504 004767 000072 JSR PC ,CHECIO ; 
1105S 053510 012704 003162 MOV @TSTLOC ,R4 sSETUP POINTERS FOR DATA 
11056 053514 012701 053634 MOV #7$1002,R1 ; 
11057 053520 174014 STO ACO, (R4) sCHECK IF ACO RECEIVED CORRECT DATA 
11058 O53S22 004767 000054 JSR PC ,CHEC1O : 
11059 053526 012701 053624 MOV @7S1001,R1 sSETUP POINTER TO DATA 
11060 053532. 172511 LOO (R1),AC1 sCLEAR AC1 
11061 OS3S34 170001 SE TF sSET FO=0 
11062 053536 174100 STF AC1i,ACO 3s TEST INSTRUCTION 
11063 053540 170011 SETD sSET FD 
11064 053542 012704 003162 MOV @TSTLOC ,R4 sSETUP POINTER TO DATA 
11065 053546 174114 STO AC1,(R4) s;CHECK IF AC1 HAS BEEN ALTERED 
11066 053550 004767 000026 JSR PC .CHEC1O F 
11067 053554 012704 053644 MOV @7$1004 ,R4 sSETUP POINTERS FOR DATA 
11068 053560 012701 003162 MOV @TSTLOC,R1 ; 
11069 053564 174011 STO ACO,(R 1) sCHECK IF ACO HAS CORRECT DATA 
070 053566 004767 000010 JSR PC ,CHEC1O 3 
ths 053572 012637 MOV (SP )+ ,a04 sRESTORE VECTOR 
11 
11073 3 
eS 053576 000167 000052 JP FIN1O 
1 
11076 012703 000004 CHEC1O: MOV 64 RS sINIT COUNTER 
11077 053606 1 chp (R4)+, CR1L)> sIS DATA OK 
11076 053610 001401 SEQ CHK10 sYES GO ON 
11079 053612 104003 ERROR «3 3FPP ERROR 
11060 sNO GO TO ERROR 
11061 053614 077304 CHK10: $08 R3,CHLO sARE WE DONE 
ieee 053616 000207 RTS PC sYES RETURN 
3 
110864 053620 104005 TSF10: ERROR +3 3FPP ERROR 
11065 3000 ADORESS TRAP 
11066 053622 000006 ‘ RTT 3 
11067 ‘* 
11068 053624 000000 7$1001: .WORD O 
11089 053626 000000 -WORD O 
11090 053630 000000 .WORD O 
11091 053632 000000 . WORD 0 
177777 7$1002: .WORD 177777 
11093 053636 111236 WORD 111236 
11094 053640 100045 . WORD 1 5 
11095 053642 003651 -WORD 3651 
11096 053644 000000 TS$1004;: .WORD 0 
11097 053646 000000 . WORD 0 
11096 053650 100045 .WORD 100045 
11099 053652 003651 .WORD 3651 
11100 053654 FINIO: 
11101 3 
11104 053654 TSFP11; 
11105 s TEST FOST SINGLE OPERAND MODE O 
11106 053654 005037 135370 CLA BOTRPFLG s;CLEAR TRAP FLAG 
11107 053660 012704 000200 MOV 0200 ,R4 sSETUP TO LOAD FPS 
11106 053664 170104 LOFPS R4 3SET FO#=1 
11109 053666 012704 053740 MOV #7S$1101,R4 )SETUP POINTER TO DATA 
11110 053672 172414 LOO (R4),ACO 3LOAD ALL ONES TO ACO 
11111 053674 170400 CLRO ACO : TEST INSTRUCTION 


11112 053676 170203 STFPS) RS sGET FPS 


a ee + + eee 


COKDACO KDJ11-B8 CLUSTER DIAG. MACRO M1200 


FLOATING POINT 
11113 053700 
704 


11173 054070 


TESTS 
012704 003162 MOV Ah ty 33 : R4 : 
174014 STO ~ yw’ sCHECK ACO FOR ALL ZEROES 
012701 000004 MOV yd ane sINIT COUNTER 
022427 000000 18: CMP (R4)+, 60 
001401 BEQ 2s ;0K GO ON 
104003 ERROR 3 sFPP E 
sNO GO TO ERROR 
077105 2s; $08 R1,1% F WE 
020327 000204 CMP R3, 0204 sCHECK FPS 
001401 BEQ 3% 30K GO OF 
104003 ERROR 03 3FPP ERROR 
3NO GO TO ERROR 
3%: 
3 
000167 000010 JP FINI1 
3 
177777 7T$1101: .WORD 177777 
177777 -WORD 177777 
177777 . WORD 177777 
177777 -WORD 177777 
FINL1: 
3 
TSFPl2: 
3 TEST FOST SOP MODE O WITH ILLEGAL AC7 
005037 135370 CLR SeTRPFLG sCLEAR TRAP FLAG 
012703 040200 #40200 ,R3 sSETUP TO LOAD FPS 
170103 LOFPS R35 sSET FID=1, AND FD=1 
170407 CLRO AC7 3s TEST INSTRUCTION 
170204 STFPS R4 3GET FPS 
170305 STST 3GET FEC 
022704 140200 Crop #140200 ,R4 3IS FPS CORRECT 
001401 BEQ 1$ 3YES GO ON 
104003 ERROR 3 3;FPP ERROR 
sNO GO TO ERROR 
022705 060002 1%: CMP 62 ,R5 31S FEC CORRECT 
001401 BEQ 2s sYES GO ON 
104003 E +3 sFPP ERROR 
sNO GO TO ERROR 
es: 
F 
TSFP13: 
: TEST FOST SOP MODE 1 
013746 000004 MOV a4, -( SP) sSAVE TIMEOUT VECTOR 
012737 054130 000004 MOV OTSF13,a04 sSETUP NEW VECTOR 
005037 135370 CLR SOTRPFLG sCLEAR TRAP FLAG 
012702 000200 Mov 0200 ,R2 sSETUP TO LOAD FPS 
170102 LOFPS Re sSET FD=1 
012705 MOV 04 RS sINIT COUNTER 
012704 003162 MOV @TSTLOC ,R4 ;SETUP POINTER TO TEST LOCATION 
012724 177777 100%; MOV 0177777, (R4)> sMOVE ALL ONES TO TEST LOCATION 
077503 $08 RS,100% ;ARE WE DONE 
012702 003162 MOV @TSTLOC ,R2 3SE 
170412 CLRO (R2) F vee INSTRUCT ION 
170203 STFPS R3 sGET FPS 
020227 0053162 CMP R2,@TSTLOC sWAS R2 AI. TERED 
001401 BEG 1% sNO GO ON 
104003 ERROR +3 3FPP ERROR 


D16 


16-OCT-84 16:38 PAGE 7-180 


TUP POINTER TO DATA 


SEQ 0196 


COKDACO KDJ11-8 CLUSTER DIAG. 
FLOATING POINT TESTS 


012701 
022227 


135370 
000200 


003162 
177777 
003162 
003172 


003162 
000004 
000000 


RTT 
3 
FINIS: 
3 
TSFP14: 
8 


100%: MOV 


E16 


MACRO M1200 18-OCT-84 16:38 PAGE 7-181 


TEST FOST SOP MODE 2 
MOV 904, -( SP) 


oTSF 14,004 
QeTRPFLG 
#200 ,R2 

Re 


04 RS 
@TSTLOC .R4 
0177777, CR4 )o 
RS, 1008 
@TSTLOC ,R2 
(R2)+ 

R3 

R2, @TSTLOC+10 
1s 

+3 

@TSTLOC ,R2 

04 ,R1 

_ +, 00 


(SP)+,a04 


FINI4 
+3 


sYES GO TO E 


RROR 
sINIT COUNTER 


sNO GO TO ERROR 


sRESTORE VECTOR 


3FPP ERROR 
:000 ADORESS TRAP 


sRE TURN 


sSAVE TIMEOUT VECTOR 
sSETUP NEW VECTOR 
sCLEAR TRAP FLAG 
sSETUP TO LOAD FPS 


sSET FO#1 
sINIT COUNTER 


s;SETUP POINTER TO TEST LOCATION 
sMOVE ALL ONES TO TEST LOCATION 


sSETUP POINTER TO DATA 
3; TEST INSTRUCTION 
3;GET FPS 

sIS R2 CORRECT 


sYES GO ON 


3FPP ERROR 
:NO GO TO ERROR 


An be POINTER TO DATA 


sINIT COUNTE 


1 CHECK LOCATION FOR O 


YES GO ON 


3FPP ERROR 
3NO GO TO ERROR 


;ARE WE 
3;CHECK FPS 
:0K GO ON 


sFPP ERROR 


3NO GO T 


O ERROR 
sRESTORE VECTOR 


3—FPP ERROR 


sCHECK LOCATION FOR 0 
GO ON 


SEQ 0199 





11234 054262 
11236 054264 


COKDACO KDJ11-B8 CLUSTER DIAG. 
FLOATING POINT TESTS 


000006 
000240 


000004 


054446 000004 
135370 
000200 


000011 
003162 
177777 
003174 003162 
003162 


003164 


003162 
003174 


177.77 


Fi6. 


MACRO M1200 16-OCT-84 16:38 PAGE 7-182 


s000 ADORESS TRAP 
RTT +RE TURN 


STEST FOST SOP MODE 3 
; 


3 
TSFP15: 
3 
MOV @04,-(SP) sSAVE TIMEOUT VECTOR 
MOV @TSF15, 804 sSETUP NEW VECTOR 
CLR SOTRPFLG sCLEAR TRAP FLAG 
MOV #200 ,R2 sSETUP TO LOAD FPS 
LOFPS Re 3SET FD#1 
MOV #9. .RS sINIT COUNTER 
MOV @TSTLOC .R4 sSETUP POINTER TO TEST LOCATION 
100%: MOV 177777, (R4)o ;INIT TEST LOCATION 
S08 R5S,100% sARE WE DONE 
MOV @TSTLOC +12, BOTSTLOC sINIT TEST LOCATION 
MOV @TSTLOC ,R2 »SETUP POINTER TO DATA 
CLRO AR2)> PF Le INSTRUCT ION 
STFPS R3 3GET FPS 
CMP R2, @TSTLOC+2 3IS R2 CORRECT 
BEQ 1% 3YES GO ON 
ERROR 3 sFPP ERROR 
sNO GO TO ERROR 
1%: MOV @TSTLOC,R ;SETUP POINTER TO DATA 
cep a SiSTLOC. 12 31S DATA CORRECT 
BEQ sYES GO ON 
ERROR — 3;FPP ERROR 
3NO GO TO ERROR 
2s: MOV @4,R1 sINIT COUNTE 
3%; CMP (R2)*¢, 0177777 31S LOCAYION ALL ONES 
BEQ 43 3YES GO ON 
ERROR +3 3—PP ERROR 
sNO GO TO ERROR 
4%: S08 R1,3% sARE WE DONE 
MOV @4,R1 sINIT COUNTER 
5$: CMP (R2)+, 00 :IS LOCATION O 
BEQ 6% sYES GO ON 
ERROR 3 3FPP E 
sNO GO TO ERROR 
6%: so8 R1,5$% sARE WE DONE 
CMP R3, 0204 sCHECK FPS 
BEQ $ 30K GO 
ERROR 3 3;FPP ERROR 
:NO GO TO ERROR 
78: MOV (SP): ,804 ;RESTORE VECTOR 
° 
JMP FINIS 
o 
TSF15;: ERROR +3 3FPP ERROR 


s000 ADDRESS TRAP 


SEQ 0200 


SP pind ae 


COKDACO KDJ11-B8 CLUSTER DIAG. 
FLOATING POINT TESTS 

000006 
000240 


177777 
003172 


003162 


000004 
177777 


G16 


MACRO M1200 16-OCT-84 16:38 PAGE 7-183 
RTT 
6 
FINIS: NOP 


3 
TSFP16: 
3 
MOV @e4,-(SP) 
000004 MOV OTSF 16,804 
CLR SeOTRPFLG 
MOV #200 ,R2 
LOFPS R2 
mov 06. .RS 
MOV @TSTLOC .R4 
1008: MOV 0177777, CR4)> 
S08 RS, 100% 
MOV @TSTLOC+10,R2 
RO -(R2) 
STFPS R35 
CMP R2, OTSTLOC 
BEQ is 
+3 
1$: MOV 04 ,R1i 
2s: CMP (R2)+,00 
BEQ 3% 
ERROR 3 
3%: so8 R1.28 
MOV @4,R1 
4$; CMP (R2)+,0177777 
BEQ 5% 
ERROR 3 
5$: soB8 R1,4% 
CMP R3, 0204 
BEQ 6$ 
ERROR 3 
6$ MOV (SP)+, 204 
; 
JMP FINI6 
3 
TSF16: ERROR 3 
RTT 
FINI6: NOP 
a 
H 
3 see ewer mem mem mere rrr ere 
;TEST FOST SOP MODE 5 


SEQ 0201 


sRE TURN 


sSAVE TIMEOUT VECTOR 
sSETUP NEW VECTOR 
sCLEAR TRAP FLAG 
sSETUP TO LOAD FPS 


ER 
sSETUP POINTER TO TEST LOCATION 
+ iy LOCATION 


3 
sSETUP POINTER TO DATA 
; TEST INSTRUCTION 
3GET FPS 
:IS R2 CORRECT 
3YES GO ON 
3FPP ERROR 
3NO GO TO ERROR 
sINIT COUNTER 
3IS LOCATION 0 
;YES GO ON 
3FPP ERROR 
3NO GO TO ERROR 
sARE WE DONE 
sINIT COUNTER 
3IS LOCATION UNCHANGED 
GO ON 


sNO GO TO ERROR 
sRESTORE VECTOR 


sFPr’ ERROR 
s000 ADDRESS TRAP 
;RETURN 


COKDACO KDJ11-8 CLUSTER DIAG. 


FLOATING POINT TESTS 


11371 054704 
11372 054706 
11373 

11374 054710 


11375 054714 
11376 054716 
377 


000004 
054774 
135370 
000200 


000011 
003162 
177777 


003174 
003164 
003162 


003174 


000004 
177777 


MACRO M1200 18-OCT-84 16:36 


003162 


100%: 


1%: 


2s: 
3%: 


4%: 
S$: 


6%: 


H16 


PAGE 7-164 
SEQ 0202 

@e4 , -( SP) sSAVE TIMEOUT VECTOR 
OTSF17,904 ;SETUP NEW VECTOR 
SeTRPFLG ;CLEAR TRAP FLAG 
#200 ,R2 sSETUP TO LOAD FPS 
R2 sSET FOe1 
#9. RS sINIT COUNTER 
@TSTLOC ,R4 ;SETUP POINTER TO TEST LOCATION 
177777, (R4)> sINIT TEST LOCATION 
RS, 1008 sARE WE DONE 
@TSTLOC +12, BOTSTLOC sINIT TEST LOCATION 
@TSTLOC+2,R2 ;SETUP POINTER TO DATA 
@-(R2) : TEST INSTRUCTION 
R3 sGET FPS 
R2, @TSTLOC :IS R2 CORRECT 
1% sYES GO ON 
3 3FPP ERROR 

3NO GO TO ERROR 
(R2)+, @TSTLOC+12 :IS DATA CORRECT 
2s ;YES GO ON 
3 sFPP ERROR 

sNO GO TO ERROR 
#4 ,R1 sINIT COUNTER 
(R2)¢,0177777 3IS LOCATION ALL ONES 
at sYES GO ON 
3 3FPP ERROR 

sNO GO TO ERPOR 
R1,3% sARE WE DONE 
04 ,R1 sINIT COUNTER 
CR2)+,00 sIS LOCATION O 
6% ;YES GO ON 
+3 ;FPP E 

sNO GO TO ERROR 
R1,5$% 3 we 
R3, 0204 3CHECK FPS 
7$ 3:0K GO 
3 3FPP ERROR 

sNO GO TO ERROR 
CSP )+,804 sRESTORE VECTOR 
FIN17 
+3 3:—FPP ERROR 

3000 ADDRESS TRAP 

;RETURN 


were wm em eet em eee weer eee eee 


FOST SOP MODE 6 


11436 055106 
11437 055110 
11438 055114 


11465 055154 
11466 
11467 055154 


TESTS 


012702 


135370 
000004 
055146 
000200 
000010 
003162 
177777 
0031635 
000007 
003163 


003162 
000004 
177777 


135370 


000004 
055336 
000200 


116 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:56 PAGE 7-185 
FLOATING POINT 


TSFP20: 
‘ 
CLR BeTRPFLG 
MOV 904, -( SP) 
MOV @TSF 20,804 
MOV #200 ,R2 
LOFPS Re 
MOV 06. ,R5 
@TSTLOC ,R4 
100$: MOV @177777,CR4)-+ 
$08 RS,100% 
@TSTLOC+1,R2 
7(R2) 
STFPS R3 
R2, @TSTLOC+1 
BEQ 1$ 
ERROR 3 
1$: MOV @TSTLOC ,R2 
MOV @4,R1 
2s: CMP CR2)¢, 0177777 
BEQ 3% 
ERROR +3 
MOV # ,R1 
4% CmP (R2)+,00 
BEQ 5% 
ERROR +3 
S$: S08 R1 43 
CMP R3, 0204 
BEQ 6$ 
ERROR 3 
63: MOV (SP )-« 204 
Hl 
JMP FIN2O 
° 
TSF20: ERROR +3 
RTT 
FIN2O: NOP 


sTEST FDOST SOP MODE 7 
; 


3 
TSFP21: 
$ 


sCLEAR TRAP FLAG 

sSAVE TIMEOUT VECTOR 

;SETUP NEW VECTOR 

sSETUP TO LOAD FPS 

sSET FD=1 

sINIT COUNTER 

sSETUP POINTER TO TEST LOCATION 
sINIT TEST LOCATION 


sARE WE 
sSETUP POINTER TO DATA 
; TEST INSTRUCTION 
3;GET FPS 
31S R2 CORRECT 
sYES GO ON 


ERROR 
3NO GO TO ERROR 
pokey POINTER TO DATA 


;ARE WE DONE 
3IS FPS CORRECT 
;YES GO ON 

3;FPP ERROR 

:NO GO TO ERROR 
sRESTORE VECTOR 


3FPP ERROR 
:000 ADORESS TRAP 
;RETURN 


sCLEAR TRAP FLAG 
sSAVE TIMEOUT VECTOR 
sSETUP NEW VECTOR 
sSETUP TO LOAD FPS 


SEQ 0203 


J16_ 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 7-186 


SEQ 
FLOATING POINT TESTS 0204 | 
11471 055176 170102 LOFPS Re 3SET FD=1 
11472 055200 012705 000010 MOV #8. RS sINIT COUNTER 
11473 055204 012704 003162 MOV @TSTLOC,R4 sSETUP POINTER TO TEST LOCATION 
11474 055210 012724 177777 100$: MOV #177777, CR4)+ sINIT TEST LOCATION 
11475 055214 077503 S08 RS, 100% sARE WE 
11476 055216 012737 003162 003172 MOV @TSTLOC ,@@TSTLOC+10 sINIT TEST LOCATION ' 
11477 055224 012702 003165 MOV @TSTLOC+3,R2 sSETUP POINTER TO DATA 
11478 055230 170472 000005 CRD e5(R2) s TEST INSTRUCTION 
11479 055234 170203 STFPS R3 ;GET FPS 
11480 055236 020227 003165 CMP R2,@TSTLOC+3 sIS R2 CORRECT 
11481 055242 001401 BEQ is sYES GO ON 
114862 104003 ERROR +3 3FPP ERROR 
11483 sNO GO TO ERROR 
11484 055246 012702 003162 1$: MOV @TSTLOC ,R2 sSETUP POINTER TO DATA 
11485 055252 012701 000004 MOV @4,R1 sINIT COUNTER 
022227 000000 2s: CMP (R2)+, 00 sIS DATA CORRECT 
11487 055262 001401 BEG 3$ 3 YES ON 
11488 055264 104003 ERROR +3 ;FPP ERROR 
11489 3NO GO TO ERROR 
11490 055266 077105 3%: S08 R1,2¢ F 
11491 055270 022227 003162 CMP (R2)+, @TSTLOC sIS DATA CORRECT 
11492 055274 001401 BEQ As YES ON 
11493 055276 1040035 ERROR +3 FPP ERROR 
11494 sNO GO TO ERROR 
11495 055 012701 000003 4$: MOV @3,R1 sINIT COUNTER 
11496 055304 177777 5$: CMP (R2)+,0177777 3IS DATA CORRECT 
11497 055310 001401 BEQ 6$ ;YES GO ON 
11496 055312 104003 ERROR +3 3FPP 
11499 sNO GO TO ERROR 
11500 055314 077105 6$: $08 R1,5$ F WE 
11501 055316 327 000204 CMP R3, 0204 ;CHECK FPS 
11502 055322 001401 BEQ 7$ 30K GO ON 
11503 055324 104003 ERROR +3 3FPP E 
11 :NO GO TO ERROR 
ptoee 055326 012637 000004 7$: MOV (SP )+,a04 sRESTORE VECTOR 
11507 3 . 
frase 055332 000167 000004 JP FIN21 
11510 055336 104003 TSF21: ERROR +3 ;FPP ERROR 
1151 :000 ADDRESS TRAP 
ae 055340 000006 RTT ;RET 
11514 055342 000240 FIN21: NOP 
11515 3 
11516 ; 
11519 i lelieeleteiedecieteciiededeeteeiedebetatieeietebieeietedetea 
1520 sTEST FOST SOP MODE 3 GR7 
11521 H 
11522 A 
11523 055344 TSFP22: 
11524 F 
1525 055 37 155370 CLR BeTRPFLG sCLEAR TRAP FLAG 
11526 055350 013746 000004 MOV @04,-(SP) sSAVE TIME OUT VECTOR 
11527 055354 012737 055502 000004 MOV @TSF 22,804 sSETUP NEW VECT 
11528 055362 012702 000200 MOV #200 ,F2 ;SETUP TO LOAD FPS 
11529 055366 170102 LOFPS R2 3SET FD=1 


GOKDACO KDJ11-B CLUSTER DIAG. 
FLOATING POINT TESTS 


11530 055370 012705 000010 
11531 055374 012704 003162 
11832 055400 012724 177777 
1 055404 0775035 
055406 012737 003172 

11535 055414 170437 003162 
11536 055420 170205 
11537 055422 012702 003162 
11538 055426 012701 000004 
11539 055432 022227 000000 
11540 055436 001401 
11541 055440 1040035 
11543 055442 077105 

544 055444 012701 000004 
11545 055450 022227 177777 
11546 055454 001401 
11547 055456 104003 . 
11549 055460 077105 
11550 055462 020327 000204 
11551 055466 001401 
11552 055470 1040035 
11553 
11554 055472 012637 000004 
11555 

1556 
11557 055476 000167 000004 
11559 055502 104003 
11561 055504 000006 
11563 055506 000240 
11564 
11567 
11568 
11569 
11570 
11571 
11572 055510 
11573 
11574 055510 005037 135370 
11575 055514 013746 000004 
11576 055520 012737 055622 
11577 05 012702 000200 
11576 055532 170102 
12579 0555 012705 000004 
115860 055! 012704 003162 
11561 055544 012724 177777 
11562 055550 077503 
115863 055552 170467 125404 
11564 055556 170203 
11565 055560 012701 000004 
11586 055' 012702 003162 
11587 055570 022227 000000 
1158686 055574 001461 





K16. 
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MOV 66. ,RS sINIT COUNTER 
MOV @TSTLOC ,R4 sSETUP POINTER TO TEST LOCATION 
1008: MOV 4177777, CR4)o sINIT TEST LOCATION 
S08 RS,100% WE DONE 
003162 MOV @TSTLOC+10, B@TSTLOC sINIT TEST LOCATION 
RO @eTSTLOC s TEST INSTRUCTION 
STFPS R3 3;GET 
MOV #TSTLOC ,R2 sSETUP POINTER TO DATA 
MOV 64,R1 sINIT COUNTER 
1$: CMP (R2)+,00 :IS DATA CORRECT 
BEQ <« 2s 3YE ON 
ERROR. +3 3;FPP ERROR 
;NO GO TO ERROR 
2s: S08 R1,1$% 3; ARE 
MOV 04,R1 sINIT COUNTER 
3$: CMP (R2)+,0177777 :IS DATA CORRECT 
BEQ 4$ 3YES GO ON 
3 3FPP 
3NO GO TO ERROR 
4%: soB R1,3$% : 
CMP R3, 0204 3CHECK FPS 
BEQ 5% 3 GO 
ERROR +3 3FPP ERROR 
sNO GO TO ERROR 
5$ MOV (SP)+,804 sRESTORE VECTOR 
> 
JMP FIN22 
3 
TSF22: ERROR +3 3FPP ERROR 
:000 ADDRESS TRAP 
RTT ;RETURN 
FIN22: NOP 
3 
; 
i TEST FOST SOP MODE 6 GR7 
3 
ry 
TSFP23: 
: 
CLR SOTRPFLG ;CLEAR TRAP FLAG 
MOV @04,-( SP) sSAVE TIMEOUT VECTOR 
000004 MOV oTSF 23,304 sSETUP NEW VECTOR 
MOV #200 ,R2 ;SETUP TO LOAD FPS 
LOFPS Re 3SET FD=1 
MOV o4,R5 sINIT COUNTER 
MOV @TSTLOC ,R4 ;SETUP POINTER YO TEST LOCATION 
100$: HOV + thin CR4)>+ sINIT TEST LOCATION 
R5,100 sARE WE DONE 
CLRO TSTLOC. ; TEST INSTRUCTION 
STFPS R3 3GET FPS 
Vv 04,R sINIT COUNTER 
MOV eTsTLOC.R2 ;SETUP POINTER TO DATA 
1%: CMP (R2)+,00 3IS DATA CORRECT 
BEQ es sYES GO ON 


SEQ@ 0205 


115869 055576 
11590 


16 
11630 055722 
11631 055724 


11632 

11633 055726 
11634 055730 
11635 055734 
11636 055736 
11637 

11638 055740 
11639 055744 


TESTS 


62 
177777 
003162 
125266 


003162 
000004 
000000 


003162 


000003 
177777 


003172 


ERROR 

2s: S08 
CMP 
BEQ 
ERROR 

3%: MOV 

G 
JMP 

e 

TSF23: ERROR 
RTT 

FIN23: NOP 

a 

3 

7 

;TEST FOST 

; 

b 

TSFP24: 

3 
CLR 
MOV 
MOV 
MOV 
LOFPS 
MOV 
MOV 

100%: MOV 
soB 
MOV 
CLRO 
STFPS 
MOV 
MOV 

1%: CMP 
BEQ 
ERROR 

2s: so8 
CMP 
BEQ 
ERROR 

3%; MOV 

4s: CMP 
BEQ 
ERROR 

5$: S08 
CMP 
BEQ 
ERROR 
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3 3FPP ERROR 

sNO GO TO ERROR 
R1,1$ sARE WE DONE 
R3, 0204 sCHECK FPS 
3% 30K GO 
3 3FPP ERROR 

sNO GO TO ERROR 
(SP )+, 804 sRESTORE VECTOR 
FIN23 
3 3;FPP ERROR 

:000 ADDRESS TRAP 

° 
MODE 7 GR7 
SOTREFLG ;CLEAR TRAP FLAG 
004, -( SP) sSAVE TIMEOUT VECTOR 
OTSF 24,804 ;SETUP NEW VECTOR 
oR2 sSETUP TO LOAD FPS 
3SET FD#=1 

06. RS sINIT COUNTER 
@TSTLOC ,R4 sSETUP TEST LOCATION POINTER 
177777, CR4)> sINIT TEST LOCATION 
RS, 1008 ;ARE WE DONE 
@TSTLOC ,@@TSTLOC+10 sINIT TEST LOCATION 
@TSTLOC+10 ; TEST INSTRUCTION 
R3 3;GET FPS 
@TSTLOC ,R2 3SETUP POINTER TO DATA 
04 ,R1 sINIT COUNTER 
(R2)+,00 :IS DATA CORRECT 
2s sYES GO ON 
3 3FPP E 

sNO GO TO ERROR 
R1,18 3 
(R2)+, OTSTLOC 3IS DATA CORRECT 
3% sYES ON 
+3 3FPP ERROR 

3NO GO TO ERROR 
@3,R1 sINIT COUNTER 
(R2)+,@177777 :IS DATA CORRECT 
5$ :YES GO ON 
3 3FPP ERROR 

3NO GO TO ERROR 
R1,4% sARE WE DONE 
R3, 0204 3;CHECK FPS 
6$ 10K GO ON 
3 ;FPP ERROR 
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11648 055766 012637 
11649 


ties 055772 
11683 055776 
11655 056000 
11657 056002 
11661 6 


000167 


000004 


135370 


003162 
177777 
003162 


003166 


003162 
000002 
000000 


000002 
177777 
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63: MOV (SP)+, 804 
Hy 

JMP FIN24 
H 
TSF24: ERROR +3 
RTT 
FIN24: NOP 
3 
3 
i TEST CLRF 
3 
3 
TSFP2S: 
a 
CLR SeTRPFLG 
CLR Re 
LOFPS R2 
MOV 64 ,RS 
MOV @TSTLOC .R4 
100%: MOV 177777, CR4)>« 
$08 RS ,100% 
MOV @TSTLOC ,R2 
RF C(R2)+ 
STFPS R3 
CMP R2, @TSTLOC +4 
BEQ 1% 
ERROR 3 
1%: MOV @TSTLOC ,R2 
MOV @2,R1 
2s CMP (R2)+,00 
BEQ 3$ 
+3 
3$% S08 R1,2$ 
MOV #2,R1 
4$: CMP (R2)+, 0177777 
BEQ 5$ 
ERROR +3 
S$: scB R1,4$ 
CMP. R304 
BEQ 6% 
ERROR 3 


° 
TSFP26: 


6 ee 


sRESTORE VECTOR 


sFPP ERROR 
:000 ADDRESS TRAP 
‘ 


sCLEAR TRAP FLAG 

sSETUP TO LOAD FPS 

sSET FD=0 

sINIT COUNTER 

sSETUP POINTER TO TEST LOCATION 
sINIT TEST LOCATION 

ARE WE DONE 


; 
sSETUP POINTER TO DATA 
; TEST INSTRUCTION 


3;GET 
31S R2 CORRECT 
:YES GO ON 
3FPP ERROR 


3NO GO TO ERROR 
sSETUP POINTER TO DATA 
s INIT COUNTER 


E 
3IS DATA CORRECT 
sYES GO ON 


3;FPP ERROR 





B1 


ae ee + Se 
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SEQ 0208 
FLOATING POINT TESTS 
17 3 
HE exes oma sms ap gms 8 Tet 
11711 : 
11712 056130 170104 LOFPS Ra ISET FO*0 
11718 056132 170567 000264 TSTF $2600 ; TEST INSTRUCTION 
11714 056136 170203 STFPS RS IGET FPS 
11715 036240 020327 000004 Ce OtCRS 0 i CHECK FPS 
11716 056144 001401 seo Osi ,0K GO ON 
11717 036146 104003 ERROR «3 iFPP 
11718 iNO GO TO ERROR 
11719 056150 012706 It: MOV. —s«@TS26D0.R4 }SETUP POINTERS TO DATA 
11720 056154 012702 056432 MOV —«-@TS2603..R2 
11721 0536160 004767 000200 JSR «PC, CHEC26 ICHECK IF DATA IS CORRECT 
11722 056164 170537 056412 TSTF  geTS2601 ; TEST INSTRUCTION 
11723 956170 170203 STEPS 1GET FPS 
11724 056172 020327 000010 CH «RS, 010 I CHECK FPS 
11725 056176 001401 ry} ;0K GO ON 
11726 104003 ERROR 43 1FPP ERROR 
11 Fy ERROR 
11728 os6202 012708 56412 26: mov @T$2601.R4 iSETUP POINTERS TO DATA 
CRSS06 $2604, A 
11730 056212 004767 000146 JSR PC, ICHECK IF DATA IS CORRECT 
11731 036216 170367 000200 sre TS i TEST INSTRUCTION 
056222 7020 b 
11733 056224 020327 000000 OP sR. 80 ‘CHECK FPS 
11734 056250 001401 seo OC ;0K GO 
iivse gs 4s TD GD 10 ERROR 
| 
11737 956234 012708 3s: MOV eTS2602,.R4 SSETUP POINTERS TO DATA 
11738 0552460 012702 056452 MOV —«-@TS2605.R2 : 
11739 056244 004767 000114 JSR «PC, CHEC26 ‘CHECK IF DATA IS CORRECT 
tive, ooease Saaies 1 : 2 ys baal ite. 
3 Ss 
11742 056256 170537 956402 TSTD.  @eTS2600 ; TEST INSTRUCTION 
11743 056262 170203 STFPS IGET FPS 
11744 056264 020327 000204 CHP «RS, 0208 ICHECK FPS 
11745 056270 001401 seo ;0K GO ON 
> meine: sommes $5 OD Gb Te ERMA 
3 
11748 056274 012704 056402 4%: MOV _—s- @TS2600,R4 rSETUP POINTERS TO DATA 
11749 056300 912702 056432 MOV —s«OTS26D3-R2 
056304 004767 JSR «PC CHE I CHECK IF DATA IS CORRECT 
11751 056310 170567 000076 isto) OT ; TEST INSTRUCTION 
11752 056314 170203 STFPS RS iGET FPS 
11753 056316 020327 000210 Cw = RB, 0210 iCHECK FPS 
11754 056322 001401 seo Ot«é*S8 :0K GO 
iifse es = ND GD TO ERROR 
3 
11757 056326 012708 ose412 St: Moyet S26D1 Re SSETUP POINTERS TO DATA 
056442 @TS2604, 3 
11759 056336 004767 000022 JSR —s- PC, CHEC.26 ICHECK IF DATA IS CORRECT 
11760 056342 170567 000054 tsto)OUd*T ; TEST INSTRUCTION 
11761 056346 170203 STFPS IGET FPS 
11762 056350 020327 000200 CHP = «RS, 0200 iCHECK FPS 
11763 056354 001401 BEOOtsé#S ;0K GO ON 
11764 056356 104003 ERROR «3 1FPP ERROR 
11765 1NO GO TO ERROR 


+--+ 


Ci 
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SEQ 0209 
FLOATING POINT TESTS 

11766 056360 68 
11767 Fy 
11768 056360 00016? 000076 JP FIN26 
11769 3 
11770 056364 012701 000004 CHEC26: MOV o4,R1 s INIT COUNTER 
11771 056370 022422 18: CMP (R4)+, CR2)0 31S DATA CORRECT 
11772 056372 001401 BEQ 2s sYES GO ON 
11773 056374 104003 ERROR 3 ;FPP ERROR 
11774 sNO GO TO ERROR 
11775 056376 077104 2s: S08 R1,18 sARE WE DONE 
phe 056400 000207 RTS Pc ;RETURN 
il 3 
11778 056402 000177 TS2600: .WwOPO 177 
11779 056404 177777 . WORD 177777 
11780 056406 177777 . WORD 177777 
11781 056410 177777 .WORD 177777 
11762 056412 177777 T$2601: .WORD 177777 
11783 056414 000000 -WORD O 
11764 056416 000000 -WORD O 
11785 056420 000000 -WORD O 
11786 056422 077777 TS2602: .WORD 77777 
11787 056424 000000 -WORD O 
11788 056426 000000 -WORD O 
11789 056430 000000 -WORD O 
11790 056432 0C0177 T$2693: .WORD 177 
11791 056434 177777 .WORD 177777 
11792 056436 177777 . WORD 177777 
11793 056440 177777 . WORD 177777 
11794 056442 177777 TS2604: .WORD 177777 
11795 056444 000000 -WORD O 

056446 000000 WORD O 
11797 056450 000000 -WORD O 
11796 056452 077777 TS2605: .WORD 77777 
11799 056454 000000 WORD O 
11800 056456 000000 -WORD O 
118601 056460 000000 -WORD O 
118602 056462 000240 FIN26: NOP 
11803 F 
11606 : 
11807 ee 
11606 sTEST ABSF 
11609 3 
11610 3 
we OSS464 TSFP2Q7: 

' 
11613 056464 005037 135370 CLR BOTRPFLG sCLEAR TRAP FLAG 
11614 056470 005005 CLR RS sSETUP TO LOAD FPS 
118615 056472 170105 LOFPS RS sSET FO*0 
11816 056474 012701 000014 Ov #12. ,R1 sINIT COUNTER 
11617 056500 012704 003162 MOV @TSTLOC ,R4 sSETUP POINTER TO TEST LOCATION 
1186186 056504 012703 056710 Ov @TS27D0 ,R3 ;SETUP POINTER TO TEST VALUE 
118619 056510 012324 100%; Ov CR3)+,(CR4)> sINIT TEST LOCATION 
118620 056512 077102 $08 R1,1008 sARE WE DONE 
11621 056514 012705 003162 Mov @TSTLOC RS sSETUP POINTER TO DATA 
S20 170615 s TEST INSTRUCTION 

11623 056522 170203 STFPS R3 3GET FPS 
11624 056524 020527 003162 CMP RS, @TSTLOC 3IS RS CORRECT 


PT Ie Se et LO Se LE RO rel a aE EE LE a AON Ne ke Te a nL ee Ee 
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FLOATING POINT 


11825 056530 
11826 056532 


11873 

118674 056710 
11675 056712 
11876 056714 
118677 056716 


118661 056726 


TESTS 


MACRO M1200 18-OCT-84 16:36 


18: 


2s: 


38: 


4$: 


5$: 


CMP 
BEQ 


$3 g538s8 Z 


5938 


83988 ; 


; 


g g548 3 


D 
~« 
w 


D1 


PAGE 7-192 


is 
+3 


@TS2703,R2 
PC ,CHEC27 
R3,00 

2s 

3 


@TSTLOC+10,R5 
CRS )-o 


R3 
RS, @TSTLOC +14 
3% 
3 
@TSTLOC+10,R5 
eT 


@TSTLOC RS 
20( RS ) 


RS 

RS, @TSTLOC 

53 

3 
@TSTLOC+20,R5 
@TS2 »R2 


PC .CHEC27 


FIN27 

04 ,R1 
CRS)o, CR2)¢ 
2s 

3 

R1,18 

PC 


177777 


SEQ 0210 


sSETUP POINTER TO DATA 
sCHECK IF DATA IS CORRECT 
’ CK FPS 


3 
3FPP ERROR 


sNO GO TO ERROR 
sSETUP POINTER TO DATA 
3 TEST INSTRUCTION 
3GET FP 
31S RS CORRECT 
sYES GO ON 
3FPP ERROR 
sNO GO TO ERROR 
sSETUP POINTER TO DATA 
3 
3CHECK IF DATA IS CORRECT 
sCHECK FPS 
30K GO ON 
:FPP ERROR 
3NO GO TO ERROR 
sSETUP POINTER TO DATA 
s TEST INSTRUCTION 
3GET FPS 
31S RS CORRECT 
sYES GO ON 
3FPP ERROR 
sNO GO TO ERROR 
sSETUP POINTERS TO DATA 


3 
sCHECK IF DATA IS CORRECT 
FPS 


El 
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SEQ 0211 

FLOATING POINT TESTS 

11882 056730 000177 TS2702: .WORD 177 

11683 056732 175436 .WORD 175436 

118684 056734 136477 -WORD 136477 

11885 056736 000001 -WORD 1 

11886 056740 077777 TS2703: .WORD 77777 

11887 056742 177777 -WORD 177777 

118688 056744 177777 -WORD 177777 

11689 056746 177777 -WORD 177777 

11890 056750 000377 TS2704: .WORD 377 

11691 OS67S2 175436 -WORD 175436 

11692 056754 136477 -WORD 136477 

11693 056756 000001 -WORD 1 

11894 056760 000000 TS2705: .WORD O 

118695 056762 000000 -WORD O 

11696 056764 136477 -WORD 136477 

11897 056766 000001 -WORD 1 

11896 056770 000240 FIN27: NOP 

11899 3 

11902 3 

11903 Bo rcecccccccccccscccscosscoscosces 

11904 3TEST ABSO 

11905 3 

11906 3 

11907 056772 TSFP3O: 

11906 F 

11909 056772 005037 135370 CLR SOTRPFLG sCLEAR TRAP FLAG 

11910 056776 012705 000200 MOV @200 ,,RS ;SETUP TO LOAD FPS 

11911 057002 170105 LOFPS RS 3SET FD#1 

11912 057004 012701 000014 #i2.,R1 sINIT COUNTER 

11913 057010 012704 003162 MOV @TSTLOC ,R4 ;SETUP POINTER TO TEST LOCATION 

11914 057014 012703 057220 MOV #TS3000 ,R3 ;SETUP POINTER TO TEST VALUE 

11915 057020 012324 1008: MOV CR3)+,CR4)s sINIT TEST LOCATION 

11916 057022 077102 $08 R1,100% sARE WE DONE 

11917 057024 012705 003162 MOV @TSTLOC.RS sSETUP POINTER TO DATA 

11916 057030 170615 ABSO CRS) : TEST INSTRUCTION 

11919 057032 170203 STFPS R3 ; 3;GET FPS 

11920 057034 020527 003162 CMP RS, @TSTLOC sIS RS CORRECT 

11921 057040 001401 BEQ 1% sYES GO ON 

‘11922 057042 104003 ERROR +3 sFPP ERROR 

11923 sNO GO TO ERROR 

11924 057044 012702 057250 1$: MOV @7$3003 ,R2 sSETUP POINTER TO DATA 

11925 057050 004767 000126 JSR PC ,.CHECSO sCHECK IF DATA IS CORRECT 

11926 057054 020327 000200 CMP R3, #200 sCHECK FPS 

11927 057060 001401 BEQ 2s 30K GO ON 

11928 057062 104003 ERROR +3 FPP ERROR 

11929 sNO GO TO ERROR 

11930 057064 012705 003172 2s: MOV @TSTLOC+10,R5 ;SETUP POINTER TO DATA 

11931 057070 170625 ABSO CR5)-« : TEST INSTRUCTION 

11932 057072 170203 STFPS R3 :GET FPs 

11933 057074 020527 003202 CMP R5, @TSTLOC +20 3iS RS CORRECT 

11934 057100 001401 BEG 3% sYES GO ON 

11935 057102 104003 ERROR 3 3;FPP ERROR 

11936 sNO GO TO ERROR 

11937 057104 012705 003172 3%; MOV @TSTLOC+10,R5 ;SETUP POINTERS TO DATA 

11938 057110 012702 057260 MOV @TS3004 ,R2 ’ 

11939 057114 904767 000062 JSR PC ,CHECSO ;CHECK IF DATA IS CORRECT 


11940 057120 020327 000200 CMP R3, 200 sCHECK FPS 
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11941 057124 
11942 057126 


11943 

11944 057130 012705 003162 
11945 057134 000020 
11946 057140 
11947 057142 020527 003162 


11949 057150 


11950 
11951 057152 012705 003202 
11952 057156 012702 057270 


11957 
qos 057176 
1 


11965 057212 
11966 


11967 057214 077104 
11968 057216 000207 
11969 

11970 057220 
11971 057222 
11972 057224 
11973 057226 
11974 057230 000377 
11975 057232 


177777 


11994 057300 000240 


F4 
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BEQ ag 
ERROR +3 


4%: @TSTLOC RS 


MOV 
20(RS) 
STFPS RS 
RS, @TSTLOC 
BEQ S$ 
ERROR +3 
S$: @TSTLOC+20,R5 
MOV 
JSR 


@TS3005 ,R2 
30 


CMP 
BEQ 6% 
ERROR +3 


FINSO 


@4,R1 
CRS)+,CR2)+ 
2s 

+3 

R1,18 

PC 


g qn , 


D 
4 
Ww 


177777 


TS3004: 


TS3005: 


% 


sSETUP POINTER TO DATA 
s TEST INSTRUCTION 


;GET FPS 
a RS CORRECT 


sSETUP POINTERS TO DATA 
3 
sCHECK IF DATA IS CORRECT 
CHECK FPS 


sIS DATA CORRECT 
S GO ON 


SEQ 0212 


G1 
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SEQ 0213 
FLOATING POINT TESTS 

12000 sTEST FOST SOP MODE 2 GR7 
12001 3 
12002 3 
12003 057302 TSFP31: 
12004 3 
12005 057302 005037 135370 CLR SeTRPFLG ;CLEAR TRAP FLAG 
12006 057306 013746 000004 MOV 004 ,-(SP) sSAVE TIMEOUT VECTOR 
12007 057312 012737 057414 000004 MOV @TSF31, 904 sSETUP NEW VECTOR 
12008 057320 012702 000200 MOV #200 ,R2 sSETUP TO LOAD FPS 
12009 057324 170102 LOFPS Re2 2SET FD= 
12010 057326 170527 000005 TS031: TSTv 05 s TEST INSTRUCTION 
12011 057332 000240 
12012 057334 000240 NoP 
12013 057336 
12014 057340 170203 STFPS R3 3GET FPS 
12015 057342 020327 000204 CMP R3, 0204 3CHECK FPS 
12016 057346 001401 BEQ 1$ 30K GO ON 
12017 057350 104003 ERROR 3 3FPP 
12018 sNO GO TO ERROR 
12019 057352 012702 057330 1$: MOV @TS031+2,R2 ;SETUP POINTER TO DATA 
12020 057356 022227 000005 CMP (R2)+, 5 31S DATA CORRECT 
12021 057362 001401 BEQ rs} sYES GO ON 
12022 057364 1040035 ERROR 3 3FPP ERROR 
12023 3sNO GO TO E 
12024 057366 012701 000003 2s: MOV @3,R1 sINIT COUNTER 
12025 057372 022227 000240 3%: CMP (R2)+, 0240 3IS DATA CORRECT 
12026 057376 001401 BEQ 4s sYES GO ON 
12027 057400 104003 ERROR +3 
12028 sNWO GO TO ERROR 
12029 057402 077105 4s S08 R1,3% ;ARE WE DONE 
oy 057404 012637 000004 MOV (SP )+, 804 sRESTORE VECTOR 
120 ; 
ong 057410 000167 000004 JP FINS3S1 

3 
12035 057414 104003 TSF31: ERROR +3 3FPP ERROR 
120 :000 ADDRESS TRAP 
ytd 057416 000006 RTT ;RETURN 
12039 057420 000240 FIN31: NOP 
12040 : 
12043 
120044 2 2 2 ee eee nee ee ee eee eee nero eee 
12045 iTEST NEGF 
12046 ; 
12047 ; 
12048 057422 TSFP32: 
12049 3 
12050 057422 005037 135370 CLR BOTRPFLG ;CLEAR TRAP FLAG 
12051 057426 005005 CLR RS sSETUP TO LOAD FPS 
12052 057430 170105 LOFPS RS ;SET FD=0 
12053 057432 (12701 000014 MOV #12.,R1 sINIT COUNTER 
12054 057436 012704 003162 MOV @TSTLOC ,R4 ;SETUP POINTER TO TEST LOCATION 
12055 057442 012703 057612 MOV #TS3200,,R3 sSETUP POINTER TO TEST VALUE 
12056 057446 012324 100%; MOV (R3)+,CR4)+ sINIT TEST LOCATION 
12057 057450 077102 $08 R1,100% ARE WE 


’ DONE 
12058 057452 170767 123504 NEGF TSTLOC s TEST INSTRUCTION 
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12114 057654 003541 
12115 057656 177777 


| 
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STFPS R3 

MOV @TSTLOC RS 
MOV @TS3203,R2 
JSR PC ,CHEC32 
CMP R3,00 


BEQ 1$ 
ERROR +3 
1$: NEGF TSTLOC +10 
STFPS R3 
@TSTLOC+10,R5 


R3,010 
BEQ 2s 
ERROR +3 
2s: NEGF TSTLO+20 
STFPS R3 
MOV @TSTLOC+20,R5 
MOV #TS3205 ,R2 
JSR PC ,CHEC3S2 
CMP R3,04 
BEQ 3$ 
ERROR +3 
3%: 
3 
JP FIN32 
3 
CHEC32: MOV #4 ,R1 
1%: CMP CRS)+,CR2)+ 
BEQ 2s 
ERROR +3 
2s: so8 R1,1$ 
RTS PC 
TS3200: .WORD 170000 
-WORD 3541 
. WORD 177777 
-WORD 172710 
TS3201: .WORD 70000 
-WORD 3541 
-WORD 177777 
-WORD 172710 
-WORD 177 
-WORD 1 
-WORD 177777 
-WORD 177007 
TS3203: .WORD 70000 
-WORD 3541 
. WORD 177777 
-WORD 172710 
TS3204: .WORD 170000 
-WORD 3541 
. WORD 177777 


3;GET FPS 
sSETUP POINTERS TO DATA 


n 
sCHECK IF DATA IS CORRECT 
;CHECK FPS 
sYES GO ON 
sFPP ERROR 


sNO GO TO ERROR 
s TEST INSTRUCTION 
3GET FPS 
sSETUP POINTERS TO DATA 


$ 
s;CHECK IF DATA IS CORRECT 
sCHECK FPS 
30K 
3FPP ERROR 
sNO GO TO ERROR 
3; TEST INSTRUCTION 
3GET FPS 
sSETUP POINTERS TO DATA 


F 
s;CHECK IF DATA IS CORRECT 
sCHECK FPS 
:0K GO ON 


sFPP ERROR 
3NO GO TO ERROR 


sINIT COUNTER 
sIS DATA Bete: 


SEQ 0214 


ii 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 7-197 | 
SEQ 0215 
FLOATING POINT TESTS | 
12116 057660 172710 -WORD 172710 
12117 057662 000000 TS3205: .WORD 0 
12118 057664 000000 -WORD O 
12119 057666 177777 .WORD 177777 
12120 057670 i77007 -WORD 177007 
12121 057672 000240 FIN32: NOP 
121 8 
12125 3 
12126 ESF 8 S656 SSS SESESSAESSLS SES SU ERE SSS 
12127 ;TEST NEGO 
12128 3 
12129 3 
12130 057674 TSFP33: 
12131 8 
12132 057674 005037 135370 CLR @eTRPFLG ;CLEAR TRAP FLAG 
12133 057700 012705 000200 MOV #200 ,RS sSETUP TO LOAD FPS 
12134 057704 170105 LOFPS RS 3SET FD#1 
12135 057706 012701 000014 MOV #12.,R1 sINIT COUNTER 
12136 057712 012704 003162 MOV #TSTLOC ,R4 sSETUP POINTER TO TEST LOCATION 
12137 057716 012703 060066 MOV @TS3300 ,R3 sSETUP POINTER TO TEST VALUE 
12138 057722 012 100$: MOV CR3)+,CR4)+ sINIT TEST LOCATION 
12139 057724 077102 S08 100 sARE WE DONE 
12140 057726 170767 123230 NEGO TSTLOC s TEST INSTRUCTION 
12141 057732 170203 STFPS R3 3GET F 
12142 057734 012705 003162 MOV @TSTLOC,.RS ;SETUP POINTERS TO DATA 
12143 057740 012702 060116 MOV @TS3303,R2 3 
12144 057744 004767 000100 JSR PC ,.CHECSS 3;CHECK IF DATA IS CORRECT 
12145 057750 020327 000200 CMP R3, #200 3;CHECK FPS 
12146 057754 001401 BEQ 1$ 30K GO ON 
12147 057756 104003 3 ;FPP ERROR 
:NO GO TO ERROR 
12149 057760 170767 123206 1%: NEGO TSTLOC+i0 ; TEST INSTRUCTION 
12150 057764 170203 STFPS R3 3;GET 
12151 057766 012705 003172 MOV @TSTLOC+10,R5 ;SETUP POINTERS TO DATA 
12152 057772 012702 MOV @TS3304 ,R2 3 
12153 057776 004767 JSR PC .CHECSS ;CHECK IF DATA IS CORRECT 
060002 020327 000210 CMP R3, #210 ;CHECK FPS | 
12155 060004 001401 BEQ $ :0K GO ON 
12156 060010 104003 ERROR 3 sFPP ERROR | 
12157 sNO GO TO ERROR 
12158 060012 170767 123164 2s: NEGO TSTLOC +20 : TEST INSTRUCTION 
12159 060016 170203 STFPS R3 ;GET FPS 
060020 012705 003202 MOV #TSTLOC+20,R5 ;SETUP POINTERS TO DATA 
12161 060024 012702 060136 MOV @TS3305 ,R2 3 
12162 060030 004767 000014 JSR PC ,,CHECS3 ;CHECK IF DATA IS CORRECT 
12163 060034 020327 000204 CMP R3, 0204 ;CHECK FPS 
060040 001401 BEQ 3% 30K GO ON 
12165 060042 1040603 ERROR +3 ;FPP ERROR 
12166 sNO GO TO ERROR 
12167 060044 3%: 
12168 3 
ye 060044 000167 000076 JMP FINS3 
3 
12171 060050 012701 000004 CHEC33: MOV 64,R1 sINIT COUNTER 
12172 060054 022522 18: CMP CR5)+,CR2)+ 3IS DATA CORRECT 
12173 060056 001401 BEQ 2s ;YE ON 
12174 060060 104003 ERROR +3 ;FPP ERROR 
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FLOATING POINT TESTS 


12230 060204 
12231 060206 
12232 

12233 060210 


022722 


047600 
003122 


147600 


000002 


060162 


MACRO M1200 16- 


2s: 


3 
TS3300: 
TS3301: 
TS3302: 


TS3303: 


OCT -84 


22 
as 


SuBEGDOLDEGHUGEILOTLONS 


‘§ 


16:38 PAGE 7-198 


sNO GO TO ERROR 
sARE WE DONE 
sRETURN 


2s: 


3%: 


47600 ,R4 

R4 

@RECFEC .R2 
ACO 

R1 

#147600 ,R1 

2s 

3 

(R2) 

@2,(R2)+ 

3% 

+3 


1%,(R2)+ 


3;SETUP FPP STATUS 

3LOAD FP STATUS 

:POINT TO enn ba FEC MEMORY 

3*TEST INSTRUCTION 

sLOAD ACO — | Lee, AC7 

SAVE FPP STA 

3; VERIFY FER ary SET 

s;BRANCH IF GOOD ERROR CONDITION 
3FPP ERROR 
;THE FER BIT DIDNT SET 

3 SAVE 


FEC AND FEA 
VERIFY FEC CONTENTS 
sBRANCH IF GOOD 
3FPP ERROR 


sFEC NE 2 COPCODE ERROR) 
s;VERFIY FEA CONTENTS 
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FLOATING POINT TESTS 


12234 060214 001401 BEQ 4$ ;BRANCH FI GOOD 
12235 060216 104003 ERROR +3 3;FPP ERROR 
12236 sFEA NOT CORRECT ERROR ADDRESS 
12237 060220 4$: 
12238 
12239 
12242 3 
12243 3 
12244 _ [Dt agen aah alia i nal tia 
12245 sTEST LOD MODE2] 
12246 3 
12247 3 
12248 
12249 F 
12250 060220 MLDOM2 : 
12251 
12253 060220 012701 003142 MOV @RECDST,R1 sPOINT TO an ane DATA LOCATION 
12254 060224 012704 003234 MOV @TAB1,R4 sPOINT TO GOOD DATA 
12255 060230 012702 047750 MOV #47750 ,Re sLOAD GOOD STATUS 
060234 170102 LOFPS 3LOAD FPP STATUS - DOUBLE.ID 
12257 060236 172424 LOO CR4)+,ACO 3*TEST INSTRUCTION - 
12256 060240 170203 STFPS sSAVE TEST FPP STATUS 
12259 060242 174021 STO ACO,CR1)+ sSAVE TEST PESULT MODE 2 
060244 3 CMP »R3 ; VERIFY FPP STATUS 
12261 060246 001401 BEQ i$ ;BRANCH IF (000 
12262 060250 104003 ERROR 3 3;FPP ERROR 
12263 ;B8AD FPP STSTUS 
12264 060252 022704 003244 1%: CMP @TAB1+10,R4 sVERFIY AUTO-INCR 
12265 060256 001401 BEQ 2s sBRANCH IF GOOD 
12266 060260 104003 ERROR +3 ;FPP E 
12267 ;BAD AUTO-INCR 
12268 060262 012704 003234 2s: MOV @TAB1,R4 sPOINT TO RECEIVED DATA 
12269 060266 162701 000010 SuB #10,R1 ;RETURN R1 TO PROPER VALUE 
12270 060272 004767 055116 JSR R7,DATVER ;VERFIY DATA FROM FPP 
12271 060276 005767 122616 TST COUNT 3SEE IF COUNTER=0 
12272 060302 001401 BEQ 3$ ;BRANCH IF GOOD COMPARE 
12273 060304 104003 ERROR +3 ;FPP ERROR 
12274 3BAD DATA FROM FPP 
12275 060306 3%: 
12276 
12277 ; 
12280 ; 
122861 3 
12262 3 
12283 Brrr re ne nen nee een ee ee een eee 
12284 sTEST LOO MODE 3 
12285 ; 
12287 
| 2288 
12289 060306 MLDOMS : 
12290 
12291 3 
12292 060306 012737 rr 003164 MOV @RECDST ,@@TSTLOC+2 ;POINT TO RECEIVED DATA LOCATION 
12293 060314 012701 003164 MOV @TSTLOC+2,R1 ;SETUP STD IN MODE 3 
12294 060320 012737 003244 003162 MOV @TAB2, B@TSTLOC sPOINT 10 DATA TABLE 


oka | Gates 
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SE@ 0217 
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003162 
047750 


003146 
003260 
003314 
000200 
047550 
047750 


047540 


003254 
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Li 


PAGE 7-200 


MOV @TSTLOC ,F4 


sPOINT TO GOOD DATA 


MOV 047750 ,R2 sLOAD GOOD STATUS 
LOFPS R sLOAD cs oo - DOUBLE,ID 
LOO @CR4)+, ACO *TEST INSTRUCTION - MODE 2 
STFPS 3 s SAVE Test FPP STATUS 
STO ACO, @(R1)+ sSAVE TEST RESULT IN MODE 3 
047740 ,R3 sVERIFY FPP STATUS 
BEQ 1$ sBRANCH IF GOOD 
ERROR +3 sFPP ERROR 
sBAD FPP STSTUS 
18: CMP @TSTLOC+2,R4 sVERFIY AUTO-INCR 
BEQ 2s sB8AD AUTO-DEC ON LDD 
+3 sFPP ERROR 
sBAD AUTO-INC 
2s: CMP @TSTLOC+4,R1 3 TEST STD AUTO-1NC 
BEQ 3$ sBRANCH IF GOOD 
ERROR +3 sFPP ERROR 
sB8AD AUTO-INCR 
3$: MOV @TAB] ,R4 sPOINT TO RECEIVED DATA 


4$: 


3 
sTEST LOF, STD MODE 4 


sPOINT TO RECEIVED DATA 


3FPP ERROR 
;BAD DATA FROM FPP 


sPOINT TO RECEIVED DATA LOCATION 
sPOINT TO GOOD DATA 


3LOAD GOOD STATUS FLOATING 
;LOAD FPP STATUS - DOUBLE,ID 
3*TEST INSTRUCTION - MODE 4 
3 SAVE TEST FPP STATUS 
:SET TO DOUBLE MODE 
;SET FPP TO DOUBLE 
;SAVE TEST RESULT 
;VERIFY FPP STATUS 
;BRANCH IF GOOD 


ERROR 
;BAD FPP STSTUS 


MLDODM4 : 
a 
MOV @RECOST+4,R1 
MOV @TAB3S+4,R4 
MOV @TABE RS 
LOFPS 200 
LOO CRS), ACO 
MOV 47550 ,R2 
LOFPS R2 
STFPS R 
MOV #47750 ,R2 
LOFPS Re 
STD ACO, -C(R1) 
CMP 647540 ,,R3 
BEQ is 
ERROR +3 3FPP 
1%: CMP @TABS,R4 


;VERFIY AUTO-DEC 
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12354 060502 001401 

12355 060504 104005 

12356 

35 012704 003254 
358 060512 004767 054676 

12359 060516 005767 1223576 

12360 060522 001401 

12361 060524 104005 

12362 

12363 060526 

12364 

12365 

12366 

12369 

12370 

12371 

12372 

12373 

12374 

12375 

12376 

12377 060526 

12378 

12379 

12380 060526 012701 003142 

12381 060532 012704 003164 
060536 017737 003234 

12383 060544 012702 047 

12384 060550 170102 

12385 060552 172454 
060554 170203 

12387 060556 174011 
060560 
060562 001401 

12390 060564 104003 

12391 

12392 060566 022704 003162 

12393 060572 001401 

12394 060574 104003 

12395 

12396 060576 012704 003234 

12397 060602 004767 054606 

12398 060606 005767 122306 

12399 0606 001401 

12400 060614 3 

12401 

12402 060616 

12403 

12406 

12407 

12408 

12409 

12410 

12411 

12412 


12413 
12414 060616 





“AR 
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BEQ 2s 
ERROR +3 

2s: MOV @TAB3,R4 
JSR R7,DATVER 
TST T 
BEQ 3$ 
ERROR +3 


TEST LOD MODE 5S 


MLDOMS : 

3 
MOV @RECDST.R1 
MOV @TSTLOC+2,R4 

003162 MOV @TAB1, S@TSTLOC 
MOV #47750 ,R2 
LOFPS Re 
LOO @-(R4),ACO 
STFPS R3 
TO ACO,(R1) 

CMP R2,R3 
BEQ 1$ 
ERROR 3 

1$: CMP @TSTLOC ,R4 
BEQ 2s 
ERROR 3 

2s: MOV @TAB1,R4 
JSR R7,DATVER 
TST COUNT 
BEQ 3$ 
ERROR 3 

3$: 


;TEST LOD MODE 6 
4 

i 

; 

; 


MLDOM6 : 


sBAD AUTO-INCR 
sPOINT TO RECEIVED DATA 
sVERFIY DATA FROM FPP 
sSEE IF COUNTER=0 
_ sBRANCH IF GOOD COMPARE 
; 


ERROR 
;BAD DATA FROM FPP 


sPOINT TO RECEIVED DATA LOCATION 
sPOINT TO GOOD DATA 


sSET UP MODE S POINTER TO DATA 
sLOAD GOOD STATUS 
sLOAD FPP STATUS - DOUBLE,.ID 


3*TEST INSTRUCTION - MODE 5 
sSAVE TEST FPP STATUS 
sSAVE TEST RE 


;VERIFY FPP STATUS 
s;BRANCH IF GOOD 


;FPP ERROR 
3BAD FPP STATUS 
sVERFIY AUTO-DEC 
sBRANCH IF GOOD 
3FPP ERROR 


3BAD AUTO-DEC 
sPOINT TO EXPECTED DATA 
;VERFIY DATA FROM FPP 
3SEE IF COUNTER=0 
sBRANCH IF wu0D COMPARE 


sFPP ERROR 
3BAD DATA FROM FPP 
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12471 
12472 060770 
12473 


012701 


012701 
005004 


054522 
122222 


003142 


003234 
047750 


003162 


003234 
054434 
122134 


N1 
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003162 


MOV @RECDST +200 ,R1 
MOV @TAB2]-200,R4 
MOV 047750 ,R2 


sPOINT TO RECEIVED DATA LOCATION 
;SETUP R4 FOR MODE 6 
sLOAD GOOD STATUS 


LOFPS Re ;LOAD FPP STATUS - DOUBLE,.ID 
LOD 200(R4),ACO :L00 MODE 6 
STFPS R3 ;SAVE TEST FPP STATUS 
STD ACO, -200(R1) sSAVE TEST RESULT 
CMP 047740 ,R3 ; VERIFY FPP STATUS 
BEQ sBRANCH IF GOOD 
ERROR +3 ;FPP ERROR 
;BAD FPP STATUS 
1%: SUB #200 ,R1 3R1=RECOST 
2s: ADO ° sPOINT TO ties a 
JSR R7,DATVER ;VERFIY DATA FROM F 
TST iT 3SEE IF COUNTER=0 
BEQ 3$ ;BRANCH IF GOOD COMPARE 
ERROR +3 3;FPP ERROR 
;BAD DATA FROM FPP 
3%: 
; 
: 
iTEST LOD MODE 7 
; 
: 
; 
; 
MLDONM?7 : 
H « 
on on Ay TO RECEIVED DATA LOCATION 
3 s 
MOV oTAe1, @TSTLOC sPOINTER FOR MODE 7 GOOD DATA 
MOV 477 50, Re ;LOAD GOOD STATUS 
LOFPS R2 3LOAD FPP STATUS - COUBLE, ~ 
LOO STSTLOCC(R4), ACO ; sTEST INSTRUCTION - MODE 7 
STFPS R3 sSAVE TEST FPP STATUS 
STO AcO,(R1) 3; SAVE Le RESULT 
CMP R2,R3 ;VERIFY FPP STATUS 
BEQ 1 ;BRANCH IF GOOD 
ERROR +3 3;FPP ERROR 
;B8AD FPP STATUS 
i$ TST R4 ;VERFIY CONTENTS OF R4 
BEQ es ;BRANCH IF GOOD 
ERROR +3 tons ERROR 
3 
2s: MOV #TAB1,R4 Ary TO — -caoaen DATA 
JSR R7,DATVER ;VERFIY DATA FROM F 
TST COUNT ;SEE IF COUNTER=0 
BEQ 3$ sBRANCH IF GOOD COMPARE 
ERROR +3 ;FPP ERROR 
;BAD DATA FROM FPP 


3$: 


Be 
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12476 3 
12477 ; 
CT a ae ee ce. | ESSN Settee eames eS rerenesee 
12679 sTEST LOO MODE 27 - ONLY 16 BITS ARE LOADED OR STORED 
12480 3 
12481 : 
12482 3 
12483 3 
12484 060770 MLOM27 
12485 
12486 3 
12487 060770 012701 003142 MOV @RECDST .R1 sPOINT TO RECEIVED DATA LOCATION 
12488 060774 012704 003274 MOV eT »R4 t TO GOOD DATA 
12489 061000 012702 047750 mV €47750 ,R2 sLOAD GOOD STATUS 
12490 061004 CLR RS sR5*0 
12491 061006 170102 LOFPS R2 3sLOAD FPP STATUS - DOUBLE,.ID 
92 061010 172427 043243 LOO #5205, ACO s¢TEST INSTRUCTION - MODE 27 
12493 061014 INC R5 
12494 061016 005205 INC RS 
124 i INC RS s TEST PROPER PC PATH 
12496 061022 022705 000005 cep o3,R5 sVERIFY ONLY 3 PC INCREMENT 
12497 061026 001401 BEQ i$ sGRANCH IF PROPER PC ACTION 
12496 061030 104005 ERROR +3 3FPP ERROR 
12499 s8AD MODE 27 LOAD 
12500 061032 170203 18: STFPS sSAVE TEST FPP STATUS 
12501 061034 174011 sto ACO, CR1) sSAVE TEST RESULT 
12502 061036 022703 047740 740 ,R3 ;VERIFY FPP STATUS 
12503 061042 001401 BEQ $ sBRANCH IF GOOD 
12504 061044 104003 ERROR 3 ;FPP ERROR 
12505 3BAD FPP STATUS 
12506 061046 004767 054342 2s: JSR R7 ,OATVER ;VERFIY DATA FROM FPP 
12507 061052 005/67 122042 TST T sSEE IF COUNTER=0 
12508 061056 001401 BEG 38 sBRANCH IF GOOD COMPARE 
12509 061060 104003 ERROR 3 3FPP ERROR 
12510 :BAD DATA FROM FPP 
12511 061062 3% 
12512 
12515 3 
12516 : 
12517 Brrr eee eee ee ee ee eee eee e ee eeeee 
12518 sTEST ADOF, ADOD, SUBF, SUBD - ACO=0 FSRC=0; 
12519 : 
12520 ’ 
12521 F 
12522 061062 MINN : 
12523 
12524 : 
12525 061062 012704 003314 MOV @TABE RE sPOINT TO FSRC TEST DATA 
1 005067 122054 CLR RECDST +4 sCLEAR OUT RECEIVED DATA TABLE 
12527 061072 7 CLR RECDST +6 3 
12526 061076 012702 040000 #40000 ,R2 sSET UP GOOD STATUS 
12529 061102 170102 LOFPS 3LOAD FPP STATUS, FLOATING 
12530 061104 172414 LOF (R4),ACO 3LOAD ACO WIT! 9 
12531 061106 172014 (R4),ACO 30+ 
12532 061110 170203 STFPS R3 sSAVE STATUS 
12533 061112 022703 040004 040004 ,R3 ;VERIFY STATUS 


CMP 
12534 061116 001401 BEQ is 


sBRANCH IF GOOD 


COKDACO KDJ11-8 CLUSTER DIAG. 
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1%: 


2s: 


4: 


S$: 


6%: 


ERROR +3 
MOV @RECODST,R1 
STF ACO,(R1) 
JSR R7 ,.DATVER 
TST C T 
BEQ 2s 
ERROR 3 
MOV #40200 ,R2 
LOFPS Re 
LOO (R4),ACO 
ALO (R4),ACO 
STO ACO,(R1) 
STFPS RS 
chp €40204 ,R3 
BEQ 3$ 
+3 
JSR R7, DATVER 
TST T 
Arg 44s 
«3 
LOO (R4),ACO 
SUBD (R4), ACO 
STFPS R35 
cep 040204 ,R3 
BEQ 4s 
3 
sTO ACO,(R1) 
JSR R7 .OATVER 
TST COUNT 
BEQ 5% 
3 
LOFPS 
LOO (R4),ACO 
SUBF (R4),ACO 
STFPS 
STO ACO, (R1) 
CMP @4,R3 
BEQ 6% 
ERROR 3 
R7,DATVER 
TST COUNT 
BEQ 7$ 
ERROR 03 


sFPP ERRGR 

s8AD FPP STATUS 
sPOINT TO RECEIVERD DATA 
sSAVE DATA 
sVERIFY DATA 


3 
sBRANCH IF GOOD 
sFPP ERROR 
sBAD DATA IN ACO 
sLOAD FLOATING STATUS 


3 
sLOAD ACO WITH O 
s@TEST INSTRUCTION 
sSAVE DATA 

sSAVE FPS 

sVERFIY STATUS 


sSAVE STATUS 
;VERFIY STATUS 
sBRANCH IF GOOD 


sSAVE ACO DATA 
sVERFIY DATA 

; 

sBRANCH IF GOOD 


30-0 
sSAVE STATUS 
sSAVE ACO 
sVERFIY STATUS 


SEQ 0222 
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061434 


0540 
121534 
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sTEST ADOF ,SUBD - FSRC*0, ACO NE O 


18: MOV 


2s: LOFPS 
LOO 


3%: MOV 


@RECOST ,R1 
RS 


sPOINT TO RECEIVED DATA TABLE 
sPOINT TO SOURCE DATA TABLE 
sPOINT TO ACO DATA 

sSET TO DOUBLE FOR CLEAR 


8 
;SETUP FPP STATUS 
OAD FPS 
sLOAD ACO 
s*TEST INSTRUCTION 
sSAVE STATUS 
sSAVE ACO 
sVERFIY NEGATIVE RESULT 
sBRANCH IF GOOD 
3FPP ERROR 
3BAD FPS 
sPOINT TO EXi _CTED DATA 
VERFIY ACO 


3 CHECK RESULT 
sBRANCH IF GOOD 
3FPP ERROR 


3B8AD ACO 

3SET STATUS TO OUOBLE NODE 
sLOAD ..CO WITH A VALUE 
s*TEST INSTRUCTION 
3 SAVE on STATUS 


3 SAVE 
;VERIFY RESULT 
sBRANCH IF GOOD 
3FPP ERROR 
3BAD SUBD 
sPOINT TO EXPECTED 
sVERIFY ACO 


o 

sBRANCH IF GOOD ACO 
3FPP ERROR 
sB8AD ACO 


eee mmm mm ee eer err ee 


sTEST ADOD, SUBF - FSRC NE O, ACO=0 


SEG 0223 


COKDACO KDJ11-8 CLUSTER DIAG. 
FLOATING POINT 


99 
“ 061556 


E2 
7-2 


MACRO M1200 18-OCT-84 16:38 PAGE 06 
SEQ 0224 
TESTS 
3 
012701 003142 MOV @RECDST,R1 sPOINT TO RECEIVED DATA TABLE 
012705 003314 MOV @TABE RS sPOINT TO ACO DATA TABLE 
012704 003234 MOV @TAB1,R4 sPOINT TO FSRC DATA 
012702 000200 MOV #200 ,R2 sSETUP FPP STATUS 
170102 LOFPS R2 3LOAD FPS 
172415 LOO (RS), ACO sLOAD ACO 
172014 ADCO (R4),ACO s*TEST INSTRUCTION 
170203 STFPS R35 sSAVE STATUS 
174011 STO ACO,C(R1) sSAVE ACO 
022703 000210 CMP #210,R3 sVERFIY NEGATIVE RESULT 
001401 BEQ 1$ sBRANCH IF GOOD 
104003 ERROR +3 3;FPP ERROR 
3BAD FPS 
004767 053712 1%: JSR R7,.DATVER sVERFIY ACO 
005767 121412 TST COUNT sCHECK RESULT 
001401 BEQ 2s sBRANCH IF GOOD 
104003 ERROR 3 3FPP ERROR 
3BAD ACO 
170127 000200 2s: LOFPS 3SET STATUS TO DUOBLE NODE 
172415 LOF CRS), ACO sLOAD ACO WITH A VALUE 
173014 SUBD (R4),ACO s*TEST INSTRUCTION 
170203 STFPS R3 sSAVE FPP STATUS 
174011 STF Aco,(R1) sSAVE ACO 
022703 000200 CMP #200, sVERIFY RESULT 
001401 BEQ $ sBRANCH IF GOOD 
104003 ERROR +3 3FPP ERROR 
sBAD SUBD 
012704 003504 3%: MOV @TAB18 ,R4 a. TO EXPECTED DATA 
004767 053€46 JSR R7,.DATVER sVERIFY ACO 
005767 121346 TST COUNT 
001401 BEQ as sBRANCH IF GOOD ACO 
104003 ERROR 3 3FPP ERROR 
sBAD ACO 
4: 
F 
3 
3 ee ee ee ee ee 
:TEST ADDF, SUBD - EXPC( ACO) = EXPC(FSRC) 
F 
$ 
3 
3 
MNNRM4 ; 
3 
012702 003240 MOV @3240 ,R2 :SET FIU.FDO,FT 
170102 LOFPS R2 
012704 003334 MOV @TAB7 ,.R4 3SET FSRC 
012705 3 MOV @TABS RS sSETUP ACO 
012701 003142 MOV @RECDST ,R1 sPOINT TO RECEIVED DATA 
172415 LOO CRS), AC sLOAD ACO 
172014 ADOD (R4),ACO :eTEST obese 
174011 STO ACO, (R1) sSAVE TEST RESUL 
012704 003354 MOV @TABS,R4 sPOINT TO execien DATA 
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12712 061612 004767 
12713 061616 005767 
12714 061622 
12715 061624 
12716 

12717 061626 
12718 061632 
12719 061636 


12768 061764 
12769 061756 
12770 061772 


DIAG. 


053576 
121276 


003200 
003374 


003142 
003364 


003200 


003404 
053454 
121154 


003414 


003434 


053422 
121122 
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JSR R7, DATVER 
TST COUNT 
BEQ i$ 
ERROR +3 

1%: MOV @TABE ,R4 
MOV @TABS RS 
MOV #3200 ,R2 
LOFPS Re 
LOO (R3),ACO 
ADO R4),AC 
STO ACO,(R1) 
JSR R7 ,DATVER 
TST COUNT 
BEQ 2s 
ERROR +3 

2s: 


nee eee mee me Tee 


sTEST ADD - EXPC(FSRC) > EXPCACO) 
3 


MXDF 1: 

a 
MOV #3200 ,R2 
LOFPS Re 
MOV OTAB11,R4 
MOV @RECDST .R1 
MOV @TAB10,RS 
LOO CRS), ACO 
ADOO )»,ACO 
STFPS 
STO ACcO,(R1) 
CMP o ° 
BEa 1$ 
ERROR +3 

1%: MOV @TAB11A,R4 
JSR R7,DATVER 
TST COUNT 
BEQ 2s 
ERROR +3 

2s: MOV @1AB12,R4 
LOO CRS),ACO 
ADOD R4),ACO 
MOV @TAB136 ,R4 
STO ACO,(R1) 
JSR R7,OATVER 
TST COUNT 


sVERIFY ACO DATA 


; 

sBRANCH IF GOOD 
sFPP ERROR 
sBAD ADDD 


3 
sSETUP SAME ACO 
ROUND MODE 


sSAVE DATA 
sVERIFY ACO 


sBRANCH IF GOOD 
3FPP ERROR 
sBAD ROUND RESULT 


sR2*FPP STATUS 

sLOAD FPS STATUS 
sPOINT TO FSRC DATA 
sPOINT TO ACO RESULT 
sPOINT TO ACO DATA 


3s SAVE DATA 
3s VERIFY FPP STATUS 
sBRANCH IF GOOD 

3FPP ERROR 

3BAD FPP STATUS 
sPOINT TO EXPECTED DATA 
sVERIFY CONTENTS OF ACO 


i 

sBRANCH IF GOOD ACO 
3FPP ERROR 
sB8AD ACO, SHOULD = FSRC 

* TO FSRC DATA 


sAC 

s@TEST INSTRUCTION 

sPOINT TO EXPECTED RESULT 
1SAVE ACO DATA INTO RECDAT 
;sVERIFY DATA 


SEQ 0225 
’ 
sLOAD ACO 
s@TEST INSTRUCTION 


G2 
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FLOATING POINT TESTS 


12771 061776 001401 BEG 3$ sBRANCH =F GOOD DATA 
12772 062000 104003 ERROR 3 3FPP ERROR 
12773 sBAD ACO DATA 
12774 062002 012702 003000 38: MOV #3000 ,R2 sGET FPP STATUS DATA 
12775 062006 012704 003444 MOV @TAB14,R4 sPOINT TO FSRC DATA 
12776 062012 012705 003454 MOV @TAB15,R5 sPOINT TO ACO DATA 
12777 062016 172415 LOO CRS), ACO sLOAD ACO 
12778 062020 170102 LOFPS R2 ;FPP STATUS = FLOAT, INTERRUPTS ENABLE 
12779 062022 172014 ADOF (R4),ACO s*TEST INSTRUCTION 
780 062024 170127 000200 LOFPS #200 sRESET TO DOUBLE 
12761 062030 174011 STD Aco, ¢<R1) sRECDST=ACO 
12782 0620 012704 003 MOV @TAB10,R4 sPOINT TO GOOD DATA 
12783 062036 004767 053352 JSR R7 ,.DATVER :VERFIY CONTENTS OF ACO 
127864 062042 005767 121052 TST COUNT 5 
12785 062046 001401 BEQ 4% sBRANCH IF GOOD 
12786 062050 104003 +3 PF 
12787 3BAD FLOATING ADD 
12788 062052 012705 003464 4%: MOV @TAB16,R5 sPOINT TO ACO DATA 
12789 062056 170102 LOFPS 3FPP STATUS = FLOAT 
062060 172415 LOF CRS),ACO sLOAD ACO 
12791 062062 172014 R4),ACO s*TEST INSTRUCTION 
062064 174011 STO ACO,CR1) sSAVE ACO DATA 
12793 062066 012704 003474 MOV @TAB17,R4 sPOINT 10 GOOD DATA 
12794 062072 004767 053316 JSR R7,DAT 
12795 062076 005767 121016 TST Cc 
12796 062102 001401 BEQ 5$ sBRANCH IF GOOD 
12797 062104 104003 ERROR +3 3FPP ERROR 
3BAD FLOATING ADD 
12799 062106 5$: 
12800 
128601 
128602 
12805 8 
128606 3 
12807 Brrr eee eww wee c eee n ween ee nneee 
12608 3TEST ADDD WITH NEGATIVE OPERANDS 
12609 ; 
128610 ; 
12611 3 
128612 : 
12613 062106 MNGOP ; 
12614 
12615 3 
128616 062106 012702 003200 MOV #3200 ,R2 — FPS VALUE 
12617 062112 170102 LOFPS Re 
12618 062114 012704 003514 MOV @TAB21,R4 ;DATA oe Ay ACO AND FSR 
128619 062 172414 LOO (R4),ACO 3ACO=1 
062122 172014 ADOD (R4),ACO ieTEST INSTRUCTION 
12621 062124 170203 STFPS sSAVE STATUS 
062126 012701 003142 MOV @RECDST,R1 sPOINT TO 5s atm DATA TABLE 
12623 062132 174011 STO ACO,(R1) sSAVE ACO DAT 
128624 062134 022703 003210 CMP #3210,R3 3; VERIFY sraTUs 
12625 062140 001401 BEQ is ;BRANCH IF GOOD 
wy 062142 104003 ERROR 3 3FPP ERROR 
12628 062144 012704 003524 1%; MOV @TAB22 ,R4 sPOINT TO EXPECTED DATA 
128629 062150 004767 053240 JSR R7,DATVER 5 





128630 062154 


TESTS 


005767 
001401 
104003 


COKDACO KDJ11-8 CLUSTER DIAG. 
FLOATING POINT 


120740 


003142 
103200 


062316 


003544 


MACRO M1200 


000244 


2s: 


101%: 


3%: 


1028: 


4$: 


103%: 


104%: 


5%: 


105%: 


TST 
BEQ 
ERROR 
; 

MOV 
MOV 
MOV 
LOO 
CFCC 


STFPS 
STO 
CMP 
BEQ 


es 
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COUNT 
2s 
+3 


sVERIFY DATA 
sBRANCH IF GOCD 
3FPP ERROR 


'-FSRC! = ACO! | 


3 


R2 
(R1),ACO 
(R4 


(SP) 
@TAB24 ,R4 


sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
sSETUP FP VECTOR 


sLOAD ACO 
3*TEST INSTRUCTION 
s;COPY FPP CC 
3FPP ERROR 
:GO TO ERROR 
sSAVE FPP STATUS 
sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO DATA 
sVERIFY STATUS 
sBRANCH IF GOOD 
3;FPP ERROR 
sBAD STATUS 
sGET ERROR PC 
sVERIFY ERROR ADDRESS ON STACK 
_ sBRANCH IF GOOD 
5 


ERROR 
;BAD ERROR RETURN ON STACK 
sRESTORE STACK 
sPOINT TO EXPECTED DATA TABLE 
sVERIFY DATA 


sBRANC IF GOOD 
3FPP 
3BAD ACO DATA 


sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
sSETUP FP VECTOR 
sLOAD FPS VALUE 


3 
sLOAD ACO DATA 
3@TEST INSTRUCTION 
;COPY FPP CC 

3FPP ERROR 

3GO0 TO ERROR 
sSAVE FPS 
wre ACcO 


i VERFIY apse 
sBRANCH IF GOOD 


3FPP ERROR 


sBAD FPS STATUS 


:GET ERROR PC 
iVERIFY ERROR ADORESS ON STACK 
sBRANCH IF GOOD 
3FPP ERROR 
3B8AD ERROR RETURN ON STACK 
sRESTORE STACK 
sPOINT TO EXPECTED DATA 


SEQ 0227 








KH 
SAS) 
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SEQ 0228 
FLOATING POINT TESTS 
12887 062362 004767 053026 JSR R7,DATVER 
12888 062 005767 120526 TST COUNT 
12889 062372 001401 BEQ 6% sBRANCH IF GOOD 
12890 062374 104003 ERROR +3 s;FPP ERROR 
128691 3BAD ACO 
12892 3 !-FSRC! < !aAco! 
128693 062376 012704 003564 6%: MOV @TAB26 ,R4 sPOINT TO FSRC DATA 
012701 003554 MOV @TAB]5 ,R1 sPOINT TO ACO DATA 
012702 00 MOV #3200 ,R2 — FPS VALUE 
062412 170102 LOFPS R2 
128697 062414 012737 000246 000244 MOV 0246 , BOF PVE )SETUP Fe —e 
062422 172411 LOO (R1),ACO sLOAD ACO DAT 
12899 062424 172014 ADOD ),ACO t sTEST ENS TRUCTION 
062426 170203 STFPS sSAVE STATUS 
12901 062430 012701 003142 MOV @RECDST ,R1 sPOINT TO vr ony DATA TABLE 
062434 174011 STD ACcO,(R1) 3 SAVE 
12903 062436 020327 003200 CMP R3,¢ iVERIFY STATUS 
062442 001401 BEQ 7% sBRANCH IF GOOD 
12905 062444 104003 ERROR +3 in — 
: 
12907 062446 012704 003574 7%: MOV @TAB27 .R4 sPOINT TO Sree DSATA 
12906 062452 004767 0527 JSR R7 ,.DATVER ;VERIFY DAT 
062456 005767 120436 TST COUNT 2 
12910 062462 001401 BEQ 8$ sBRANCH IF GOOD 
12911 062464 104003 ERROR +3 3;FPP ERROR 
12912 3 
12913 3 'FSRC! > $-AC! 
12914 012704 003554 8$: MOV @TAB25 .R4 sPOINT TO FSRC DATA 
12915 062472 012701 003564 MOV @TAB26 .R1 sPOINT TO ACO DATA 
12916 062476 172411 LOO CR1),ACO sLOAD ACO DATA 
12917 062500 172014 ADOD ),ACO 3*TEST INSTRUCTION 
12918 062502 170203 STFPS 3 SAVE TUS 
12919 062504 012701 003142 MOV @RECDST ,R1 sPOINT TO RECEIVED DATA TABLE 
12920 062510 174011 STD ACO, (R1) sSAVE ACO 
12921 062512 020327 003200 CMP @ ;VERIFY STATUS 
12922 062516 001401 BEQ sBRANCH IF GOOD 
3 104003 ERROR +3 ans — 
3 
12925 062522 012704 003574 9%: MOV @TAB27 ,R4 sPOINT TO EXPECTED DSATA 
062526 004767 JSR R7, DATVER sVERIFY DATA 
12927 062532 005767 120362 TST COUNT : 
062536 001401 BEQ 10% ;BRANCH IF GOOD 
12929 062540 1040035 ERROR +3 3FPP 
12930 sBAD ACO 
12931 F $-FSRC! «< $ACO! 
12932 062542 012704 003614 10%: MOV @TAB29 ,R4 sPOINT TO FSRC DATA 
12933 062546 012701 003604 MOV @TAB2]8 ,R1 sPOINT TO ACO Mute 
12934 062552 172411 LOO CR1),ACO sLOAD ACO DATA 
12935 062554 172014 ADOD (R4),ACO VaTEST INSTRUCTION 
12936 062556 170203 STFPS sSAVE STATUS 
12937 062560 012701 003142 MOV @RECDST ,R1 sPOINT TO RECEIVED DATA TABLE 
12936 062564 174011 STO ACO,(R1) sSAVE ACO 
12939 062566 020327 003200 CMP R3,¢ ;VERIFY STATUS 
12940 062572 001401 BEQ 11% sBRANCH IF GOOD 
12941 062574 104003 ERROR +3 a4 — 
i 
12943 062576 012704 003624 118%: MOV @TAB29A,R4 sPOINT TO EXPECTED DATA 
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052606 
120306 


003200 


003514 
003142 


003314 
30 


128: 


R7,DATVER 
COUNT 


12$ 
+3 


i -25 
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SEQ 0229 


sVERIFY DATA 


$ 

;BRANCH IF GOOD 
3FPP ERROR 
a 


5 
;TEST SUB WITH EXP[ACO)=EXP[FSRC) 


MSB: 


1%: 


2s: 


3%: 


4%: 


(R4),ACO 


sLOAD FPS DATA 
3sLOAD FP 
sPOINT TO FSRC DATA 
sPOINT TO ACO RECEIVED DATA TABLE 
3LOAD ACO 
3*#TEST INSTRUCTION 
sSAVE STATUS 
sSAVE ACO INTO RECDST 
;VERIFY STATUS 
;BRANCH IF GOOD 
3FPP ERROR 
3;BAD FPS STATUS 
sPOINT TO EXPECTED DATA 
;VERIFY ACO 


3 
sBRANCH IF GOOD 
0 
sPOINT TO FSRC AND ACO DATA 
sLOAD ACO DATA 
3@TEST INSTRUCTION 


;SAVE FPS 
;SAVE ACO INTO RECOST 
;VERIFY FPS 


C 
sPOINT TO EXPECTED DATA 
; VERIFY ACO 


:BAD ACO 


wan 





ie aerate 
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SEQ 0230 
FLOATING POINT TESTS 
13005 8 
13006 Pee ese se Se coessesnssssusneensToewes 
13007 ;TEST NORMALIZE 
13008 3 
13009 3 
13010 8 
13011 3 
13012 062740 MNRM 
13013 
13014 3 
13015 062740 012702 003200 MOV #3200 ,R2 ;LOAD FPS 
13016 062744 170102 LOFPS Re : 
13017 062746 012705 003644 MOV @TAB31,R5 sPOINT TO FSRC DATA 
13018 062752 012701 003634 MOV @TABSO,R1 sPOINT TO ACO DATA 
13019 062756 172411 LOO (R1),ACO sLOAD ACO 
13020 062760 173015 SUBD CRS),ACO s*TEST INSTRUCTION 
13021 31 LEFT SHIFT 
13022 062762 170203 STFPS R3 sSAVE STATUS 
13023 062764 012704 003142 MOV @RECDST ,R4 sPOINT TO RECDATA 
13024 062770 174014 STO ACO, (R4) sSAVE ACO 
13025 062772 012701 003674 MOV @TAB34 ,R1 sPOINT TO EXPECTED DATA 
13026 062776 004767 052412 JSR R7,DATVER ;VERIFY DATA 
13027 063002 005767 120112 TST COUNT 
13028 063006 001401 BEQ is sBRANCH IF GOOD 
poy 063010 104003 ERROR +3 3FPP ERROR 
3 
13031 063012 012701 003654 1$: MOV @TAB3S2 ,,R1 3ACO DATA 
13032 063016 012705 003664 MOV @TABSS RS sFSRC DATA 
13033 063022 172411 LOO €R1),ACO sLOAD ACO 
13034 063024 173015 SUBD CRS),ACO 3*TST INSTRUCTION 
13035 356 LEFT SHIFTS 
13036 063025 012701 003142 MOV @RECDST,.R1 ;SAVE DATA 
13037 063032 174011 STO ACO,CR1) 3 
13038 063034 004767 052354 R7 ,DATVER 
13039 063040 005767 120054 TST 
1 063044 001401 BEQ 2s 3 
13041 063046 104003 ERROR +3 3FPP ERROR 
13042 3 
13043 063050 2s 
13044 
13047 : 
13048 : 
1304°¢ Boer ce c ec ewee nee nee nnn n ne eneee- 
13030 ;TEST ADDD WITH OVERFLOW AND UNDERFLOW 
13051 ; 
13052 3 
13053 5 
13054 ; 
13055 063050 MUVAD 
13056 
13057 ‘ 
13058 063050 012702 000200 MOV #200 ,R2 ;SETUP FLOATING POINT STATUS 
13059 063054 170102 LOFPS R2 3LOAD FP 
13060 063056 012704 003704 MOV @TAB4O ,R4 sPOINT TO FSRC DATA 
13061 063062 012701 003704 MOV @TAB40 ,R1 sPOINT TO ACO DATA 


13062 063066 172411 LOO (R1),ACO sLOAD ACO WITH TEST DATA 
13063 063070 172014 ADDO (R4),ACO s*#TEST INSTRUCTION 








13069 063110 
13070 

13071 063112 
pti 063116 


300 
13118 063302 
13119 063306 
13120 063310 


TESTS 
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117772 


001200 


003704 
003704 


063166 


003142 
101206 


063162 


“Le 
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000244 


CMP e a 

BEQ i$ 

ERROR 3 
1$: MOV @TABE ,R4 

JSR R7,DATVER 

TST T 

BEQ 2s 

ERROR 3 
;OVERFLOW TRAPS ENABLED 
2s: MOV #1200 ,R2 

LOFPS 

MOV @TAB40 ,R4 

@TAB40,,R1 

LOO CR1),ACO 

03% , SOF PVEC 

ADOO CR4),ACO 
23%: CFCC 

ERROR +3 
3%: STFPS 

@RECDST .R1 

STO ACO, CR1) 

CMP #101206, R3 

BEQ 

ERROR +3 
4$: MOV CSP)+,RO 

CMP #23%,RO 

BEQ 5$ 

ERROR 3 
5$: MOV (SP)+,RO 

MOV @TABE .R4 

JSR R7,DATVER 

TST T 

BEQ 7% 

ERROR 3 
sUNDERFLOW TRAPS DISABLED 
7$: MOV #200 ,R2 

LOFPS Re 

MOV @ULOTRP , BOF PVEC 


MOV @TAB7 ,R4 


sSAVE FPS 
;POINT TO RECEIVED DATA TABLE 
sSAVE ACO RESULT 
VERIFY STATUS 
sBRANCH IF GOOD 
s;FPP ERROR 
sBAD FPS 


sPOINT TO EXPECTED DATA 
sVERIFY DATA 


sBRANCH IF GOOD 


3;FPP ERROR 
;BAD ACO 
;SETUP FLOATING POINT STATUS 
3LOAD FPS 
sPOINT TO FSRC — 
sPOINT TO ACO 


DAT 
sLOAD ACO WITH TEST DATA 
3 CHANGE TRAP VECTOR 
s#TEST INSTRUCTION 


3FPP ERROR 
sFAILED TO TRAP ON OVERFLOW 
sSAVE FPS 
sPOINT TO RECEIVED DATA TABLE 

RESULT 


sSAVE ACO 
;VERIFY STATUS 
sBRANCH IF GOOD 
3FPP ERROR 
3BAD FPS 


sCHECK STORED PC 
; 
sBRANCH IF RETURN ADDRESS IS GOOD 


TACK 
sPOINT TO _—— DATA 
;VERIFY DATA 


:BAD ACO 


;SETUP FLOATING POINT STATUS 
3;LOAD FPS 
sREPLACE WILD — VECTOR 


O DATA 
;LOAD ACO WITH TEST DATA 

3;#TEST INSTRUCTION 
sSAVE FPS 
sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO RESULT 

iVERIFY STATUS 

;BRANCH IF GOOD 
3;FPP ERROR 








as «=. 
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| 
13121 sBAD FPS 
13122 063312 012704 003314 83: MOV OTABE ,R4 sPOINT TO EXPECTED DATA 
13123 063316 004767 052072 JSR R7 ,DATVER ;VERIFY DATA 
13124 063322 005767 117572 TST COUNT 
063 001401 BEQ 9$ s;BRANCH IF GOOD 
13126 0633350 104005 E +3 sFPP E 
13127 sBAD ACO 
3 ;UNDERFLOW TRAPS ENABLED 
13129 063332 012702 002200 9$: MOV #2200, sSETUP FLOATING POINT STATUS 
13130 063336 170102 LOFPS Re sLOAD FPS 
13131 063340 012737 063366 000244 MOV 11% , BOF PVEC sREPOSITION TRAP VECTOR 
13132 063346 012704 003534 MOV @TAB7 ,R4 sPOINT TO FSRC = 
13133 063352 012701 003714 MOV @TAB41 ,R1 sPOINT TO ACO DATA 
13134 063356 172411 LOO CR1),ACO sLOAD ACO WITH TEST DATA 
13135 063360 172014 ADOD C(R4),ACO s*#TEST INSTRUCTION 
13136 063362 170000 10%: CFCC sCOPTY FPP CC 
13137 063364 104003 ERROR +3 sFPP ERROR 
13138 sFAILED TO TRAP ON UNDERFLOW 
13139 063366 170203 118: STFPS R3 sSAVE FPS 
13140 063370 012701 003142 MOV @RECOST ,R1 sPOINT TO RECEIVED DATA TABLE 
13141 063374 174011 STO ACO, (R1) sSAVE ACO RESULT 
13142 063376 022703 102210 CMP #102210 ,R3 ;VERIFY STATUS 
13143 063402 001401 BEQ 12s sBRANCH IF GOOD 
13144 063404 104003 +3 sFPP ERROR 
13145 sBAD FPS 
31 012605 12%: MOV CSP)+,RS sGET ERROR PC 
13147 063410 020527 063362 cop RS, 010% sVERIFY ERRGR ADDRESS ON STACK 
13148 063414 001401 BEQ 13% sBRANCH IF GOOD 
13149 063416 104003 +3 17 PP ERROR 
sBAD ERROR RETURN ON STACK 
13151 063420 005726 13%: TST (SP )- sRESTORE STACK 
13152 063422 012704 003304 MOV @TABSA ,R4 sPOINT TO EXPECTED DATA 
063426 004767 051762 JSR R7 ,.DATVER ;VERIFY DATA 
13154 063432 005767 117462 TST T 
13155 063436 001401 BEQ 14% sBRANCH IF GOOD 
13156 063440 104003 ERROR +3 sFPP ERROR 
13157 sBAD ACO 
13156 UNDERFLOW WITH TRAPS DISBLED - NON - ZERO RESULT 
13159 063442 012702 000200 #200 ,R2 sSETUP FLOATING POINT STATUS 
13 06 170102 u sLOAD FPS 
13161 063450 012737 135360 000244 MOV @ULDTRP , BOF PVEC sRESTORE TRAP VECTOR 
012704 005714 MOV @TAB41 ,R4 sPOINT TO FSRC DATA 
13163 063462 012701 003724 MOV @TAB42 ,R1 sPOINT TO ACO DATA 
06 172411 LOO (R1),ACO sLOAD ACO WITH TEST DATA 
13165 063470 172014 ADOO (R4),ACO 3*#TEST INSTRUCTION 
13166 063472 170203 STFPS sSAVE FPS 
13167 063474 012701 003142 MOV @RECOST ,R1 sPOINT TO RECEIVED DATA TABLE 
13168 063500 174011 STO ACO,(R1) sSAVE ACO RESULT 
13169 063502 022703 000204 CMP #204 ,R3 ;VERIFY STATUS 
13170 063506 001401 BEQ 15% s;BRANCH IF GOOD 
13171 063510 104003 ERROR +3 sFPP ERROR 
13172 sBAD FPS 
13173 063512 012704 003314 15%: MOV @TABE .R4 sPOINT TO - aaa DATA 
13174 063516 004767 051672 JSR R7 ,DATVER ;VERIFY DAT 
13175 063522 005767 117372 TST COUNT 
13176 063526 001401 BEQ 16% ;BRANCH IF GOOD 
13177 063530 104003 ERROR +3 sFPP ERROR 





FLOATING POINT TESTS 


13178 
13179 
131860 0635352 
13181 063536 


13185 063556 
13186 063560 
13187 063562 
13188 063564 
13189 

13190 063566 
13191 063570 
13192 063574 
13193 063576 
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16$: 


;BAD ACO 
;UNERFLOW WITH “RAPS ENABLED - NON-ZERO RESULT 
MOV #102200 ,R2 


sSETUP FLOATING POINT STATUS 


LOFPS R2 ;LOAD FPS 
MOV 018% , BOF PVEC sRESTORE TRAP VECTOR 
Mov @TAB41,R4 sPOINT TO FSRC DATA 
MOV @TAB42 ,R1 sPOINT TO ACO DATA 
LOO (R1),ACO sLOAD ACO WITH TEST DATA 
ADOD (R4),ACO :*TEST INSTRUCTION 
17%: CFCC 
ERROR 3 3FPP ERROR 
;NO TRAP ON oo 
18%: STFPS sSAVE FPS 
MOV @RECOST ,.R1 ;POINT TO RECEIVED DATA TABLE 
STO ACO,(R1) sSAVE ACO RESULT 
(SP)+,RO sSAVE STACK CONTENTS 
TST (SP )+ sCLEAN UP STACK 
#17%,RO sVERIFY RETURN ADDRESS 
BEQ 19% sBRANCH IF GOOD 
ERROR +3 3;FPP E 
;BAD RETURN ADDRE 
19%: CMP #102204 ,R3 ;VERIFY STATUS 
BEQ 20% sBRANCH IF 
ERROR +3 3;FPP ERROR 
;BAD FPS 
20% MOV @TAB43 ,R4 ;POINT TO EXPECTED DATA 
JSR R7,DATVER :VERIFY DATA 
TST COUNT 
BEQ 2i$ ;BRANCH IF GOOD 
ERROR +3 3;FPP ERROR 
:BAD ACO 
21s: 
: 
:TEST LOCFD, LOCDF 
; 
PF 
MLOC: 
a 
; TRUNCATE 
"7 #300 ,R2 ;SETUP FLOATING POINT STATUS 
LOFPS Re ;LOAD FPS 
MOV OTAB45 ,R4 sPOINT TO FSRC — 
MOV @TABE ,R1 ;POINT TO ACO DAT 
LOO (R1),ACO ;LOAD ACO WITH TEST DATA 
LOCFD (R4)+,ACO ;*TEST INSTRUCT ION 
MOV @RECOST ,R1 sPOINT TO RECEIVED DATA TABLE 
STO AcO,(R1) sSAVE ACO RESULT 
CMP OTAB45+4, R4 ;VERIFY AUTO-INC 
BEQ 1s ;BRANCH IF GOOD AUTO-INC 
ERROR +3 ;FPP ERROR 


TESTS 


003754 18: MOV @TAB4E RA 
0351502 JSR R7, OATVER 
117202 TST COUNT 
BEQ 2s 
«3 
sAUTO-INC DOUBLE MODE 
CLR Re 
LOFPS Re 
003744 MOV OTAB4S .R4 
003464 MOV @TAB16,R1 
LOO (R1),ACO 
(R4)+, ACO 
003754 Cop - OTAB45+10 
RFQ 
ERROR +3 
38: STFPS 
003142 MOV COST,R1I 
STO ACO,(R1) 
000000 CHP €0,.R3 
BEG &§ 
3 
004014 4%: MOV OTAB49 ,R4 
051412 JSR R7, DATVER 
117112 TST COUNT 
BEQ 53 
3 
sLOCFD GR7 
000200 5$: MOV #200 ,R2 
LOFPS R2 
CLR R3 
043243 LOCFD #5203,ACO 
INC R3 
INC RS 
INC R3 
000003 Cee @3,R3 
Bra 68 
3 
sNEGATIVE OPERANDS 
000200 Ov 0200 ,R2 
LOFPS Re 
003764 MOV @TAB47 .R4 
003744 MOV @TAB4S ,R1 
LOO (R1),ACO 
LOCFO R4), AC 
STFPS 
003142 MOV CDST,R1 
STO aAco,(R1) 
000210 CHP #210,R3 
BEQ 7% 
ERROR +3 


— 
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sB8AD AUTO-INC 
sPOINT TO EXPECTED DATA 
sVERIFY DATA 
sBRANCH IF GOOD 
3FPP ERROR 
sBAD ACO 


sSETUP FLOATING POINT STATUS 
sLOAD FPS 
sPOINT TO FSRC ty 


sPOINT TO ACO DATA 
LOAD — TEST DATA 


sBA0 aig ON DOUBLE 
;POINT TO "oat DATA TABLE 


sSAVE ACO 
s VERIFY STATUS 


sPOINT TO EXPECTED DATA 
;VERIFY DATA 


sBRANCH IF GOOD 


sSETUP FLOATING POINT- STATUS 
3LOAD FPS 


s*¢TEST INSTRUCTION 


sIF LOCFO WORKED, R3 SHOULD-35 
VERIFY pg PROGRAM FLOW 


sSETUP FLOATING POINT STATUS 
OAD FPS 


al 
sPOINT TO FSRC on 
sPOINT TO ACO DATA 
3LOAD ACO WITH TEST DATA 
,eTEST INSTRUCT ION 
3SAVE FP 


Ss 
:POINT TO RECEIVED DATA TABLE 
RESULT 


sSAVE ACO 

;VERIFY STATUS 

sBRANCH IF GOOD 
3FPP ERROR 


3B8AD FPS 


C3 
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13336 064214 004767 000152 JSR R7 , CHPRTN sROUTINE TO TEST DATA 
13339 064220 000000 000000 000000 -WORD =0,0,0,0 sACO AT START 
064226 000000 
13340 064230 000000 000000 000000 WORD 0,0,0,0 sFSRC AT START 
064236 000000 
13341 064240 000200 -WORD 200 sFPS AT START (D0) 
13342 064242 000204 -WORD 204 sFPS AT END 
13343 s CMPD WITH EXP[FSRC)*0, EXP[ACO)=0 
13344 064244 012737 000001 003030 MOV 01, BOFLAG sSIGNAL THAT ACO WILL = 0 
13345 064252 004767 000114 JSR R7 , CMPRITN sROUTINE TO TEST DATA 
13346 064256 000000 000000 -WORD 0,0,0,125252 sACO AT START 
064264 125252 
13347 064266 000100 000022 0001235 -WORD 100,22,1235,125 sFSRC AT START 
064274 0001235 
133486 064276 -WORD 200 sFPS AT START (D) 


SEQ 0235 

FLOATING POINT TESTS 

13294 064106 012704 004004 78: MOV @TAB48 ,R4 sPOINT TO EXPECTED DATA 

13295 064112 004767 051276 JSR R7 ,CATVER ;VERIFY DATA 

13296 064116 005767 116776 TST COUNT 

13297 064122 001401 BEC 83 sBRANCH IF GOOD 

13296 064124 104003 ERROR +3 FPP ERROR | 

13299 sBAD ACO 

13300 3LOAD A ZERO 

13301 064126 012702 000200 83: MOV #200 ,R2 sSETUP FLOATING POINT STATUS 

13302 064132 170102 LOFPS) Re sLOAD FPS 

133038 064134 012704 0033514 MOV OTABE .R4 sPOINT TO FSRC _ 

13304 064140 012701 004004 MOV OTAB4E ,R1 sPOINT TO ACO DATA | 

13305 064144 172411 LOO (R1),ACO sLOAD ACO WITH TEST DATA 

13306 064146 177414 LOCFD (R4),ACO s@TEST INSTRUCTION 

13307 064150 170203 STFPS R3 sSAVE FPS 

13306 064152 012701 003142 MOV @RECDST .R1 sPOINT TO RECEIVED DATA TABLE 

13309 064156 174011 STO ACO, CR1) sSAVE ACO RESULT 

13310 064160 022703 000204 CMP 0204 ,R3 iVERIFY STATUS 

13311 064164 001401 BEG 98 sBRANCH IF GOOD 

13312 064166 104003 ERROR +3 sFPP ERROR 

133135 sBAD FPS 

13314 064170 012704 0035314 9%: MOV OTABE RE sPOINT TO a DATA 

13315 064174 004767 051214 JSR R7 ,.OATVER ;VERIFY DAT 

13316 064200 005767 116714 TST COUNT 

13317 064204 001401 BEQ 108 sBRANCH IF GOOD 

13318 064206 104003 ERROR +3 3FPP ERROR 

13319 3B8AD ACO 

13320 064210 10% 

13321 

13322 F 

13325 2 

13326 t 

|} ©) re ee. ree 

13328 sTEST CMPD 

13329 3 

13330 3 

13331 3 

133 

13333 064210 MCMPOD : 

13334 

13335 3 

13336 : CHPO WITH FRSC*ACO*0 

13337 064210 005037 003030 CLR BOF LAG :SIGNAL THAT ACO REMAINS CONSTANT 





D3 
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SEQ 0236 
FLOATING POINT TESTS 
13349 064300 000204 WORD 204 3—-PS AT END 
13350 : CMPD FSRC>EXP[ACO)=0 
13351 064302 005037 003030 CLR OOFLAG sACO REMAINS UNCHANGED 
13352 064306 004767 000060 JSR R7, CMHPRTN bay I as DATA 
13353 064312 000400 012346 012346 . WORD 400, 12346, 12346 ,23 yACO A T STAR 
064320 000023 
13354 064322 000200 000000 000000 -WORD 200,0,.0,0 3FSRC AT START 
064330 000000 
000200 -WORDB 200 sFPS AT START (0) 
13356 064334 000210 -WORD 210 3FPS AT END 
1 : CMPD FSRC*ACO>0 
13358 064336 004767 000030 JSR R7, CMPRIN sROUTINE TO TEST DATA 
13359 064342 077777 177777 «#177777 . WORD 77777, -1,-1,-1 3ACO AT START 
064350 177777 
13360 064352 077777 477777 ~=«#177777 . WORD 77777,-1,-1.-1 sFSRC AT START 
064360 177777 
13361 064362 000200 -WORD 200 sFPS AT START (0) 
13362 064364 000204 -WORD 204 3sFPS AT END 
‘sees 064366 000167 000116 JP HOP 44 340P OVER SUBROUTINE 
13365 3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXex 
13366 g oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
13367 sCOMPARE ROUTINE DATA TABLES 
13368 3 
13369 3 ACO 
13370 3 FSRC 
13371 3 FPS BEFORE EXECUTION 
13372 3 FPS AFTER EXECUTION 
13373 F (FEC) 
13374 3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
pied 3 @XeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXex 
3 
13377 : 
133786 064372 012605 CMPRTN: MOV CSP )+, RS 3s RETURN ADORESS TO USE AS POINTER 
13379 064374 012702 000200 Mov @200 ,R2 ISET TO DOUBLE MODE FOR LOAD 
13380 064400 170102 LOFPS Re sLOAD FPS 
13381 064402 0 mov RS ,R4 :POINT TO FSRC DATA 
064404 062704 000010 ADO #10,R4 3 
13363 064410 010501 MOV RS,R1 sPOINT TO ACO DATA 
1 064412 172411 LOO (R1),ACO sLOAD ACO by TEST DATA 
13385 064414 016502 000020 MOV 20(RS),R2 IGET TEST F 7. 
13386 064420 170102 LOFPS Re 3LOAD TEST 
133867 064422 173414 1%: CMPD (R4)_,ACO seTEST SNSTRUCTION 
13388 064424 170203 STFPS R3 sSAVE FPS 
13389 064426 012702 000200 MOV #200 ,R2 3SET FPP TO DOUBLE 
13390 064432 170102 LOFPS R2 
13391 064434 012701 003142 MOV @RECDST ,.R1 sPOINT TO oe DATA TABLE 
13392 064440 174011 sto ACcO,(R1) sSAVE ACO 
13393 064442 026503 000022 CMP 22(R5),R3 s VERIFY stan 
13394 064446 001401 BEQ 2s sBRANCH IF GOOD 
13395 064450 104003 ERROR 3 sFPP ERROR 
13396 3BAD FPS 
13397 064452 005737 0030350 26: TST BOF LAG 3SEE IF ACO REMAINS UNCHANGED 
13396 064456 001403 BEQ 3$ sBRANCH IF ACO STAYS THE SAME 
13399 064460 012704 003314 MOV @TABE ,R4 3ACO=0 
3400 064464 000401 BR as 3GO VERIFY 


1 DATA 
13401 064466 010504 36: MOV RS ,R4 sPOINT TO EXPECTED DATA 


COKDACO KDJ11-B8 CLUSTER DIAG. 


FLOATING POINT 


E3 


sNO INTERRUPT, BUT FEC 
300 TEST 

ALO 

sF SRC 

sRESULT 

3; TEST FPS 

sRESULT FPS 

sFEC 


s INTERRUPT 
300 TEST 

3ACO 

3F SRC 

sRESULT 

3 TEST FPS 

sRESULT FPS 

FEC 


3sNO INTERRUPT 
3:00 T 


sACO 

3F SRC 
sRESULT 

s TEST FPS 
sRESULT FPS 


EST 


s INTERRUPT 
300 TEST 


MACRO M1200 18-OCT-84 16:38 PAGE 7-219 
TESTS 
004767 050720 4%; JSR R7,DATVER 
005767 116420 TST COUNT 
001401 BEQ 5$ 
104003 ERROR +3 
000165 000024 5$: JP 24(R5) 
HOP a4 
: 
3 
7 -eeeenenenen eee ene eee eee eee eee eee eee 
;TEST DIVF 
F 
: 
3 
3 
MDIVF : 
3 
31/€XP( AC ) =F SRC=0 
012737 003030 MOV 02, BOF LAG 
004767 000706 JSR R7 ,OVF SUB 
000100 000027 -WORD 100,27 
000000 -WORD 0,0 
000100 000027 -WORD 100,27 
640000 -WORD 40000 
140000 . WORD 140000 
000004 .WORD 4 
32/AC*EXP(FSRC)*0 
sTRAPS ENABLED 
012737 000001 003030 MOV #1, @0FLAG 
004767 000652 JSR R7 ,OVF SUB 
000000 .WORD 0,0 
000100 000000 -WORD 100,0 
000000 000000 -WORD 0,0 
000000 .WORD O 
100000 -WORD 100000 
OOK .WORD 4 
33/FSRC>ACO=0 
005037 003030 CLR BOF LAG 
004767 000620 JSR R7 ,OVF SUB 
000177 000234 -WORD 177,234 
004100 000000 -WORD 4100,0 
000000 -WORD 0,0 
007400 -WORD 7400 
007404 -WORD 7464 
34/ACO>EXP(FSRC)*0 
012737 000001 003030 MOV #1, @0FLAG 
004767 JSR R7 ,OVF 
104210 -WORD 40200,104210 
000125 . WORD 
104210 -WORD 40200,104210 
007557 . WORD $7 
107557 -WORD 107557 
. WORD 





COKDACO KDJ11-B8 CLUSTER DIAG. 
FLOATING POINT TESTS 


S09 
13510 065104 
13511 065110 


13516 065132 
13517 


005037 
004767 
077760 
077760 
040200 


007414 
007400 


005037 
004767 


003030 
000454 
125252 


000000 
070707 


2S 
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35/EXP[ AC ) *EXP[FSRC) 

CLR @OF LAG 3NO INTERRUPT 

JSR R7, OVFSUB 300 TEST 

WORD 77760,-1 sACO 

. WORD 7760,0 sFSRC 

WORD 40200,104210 sRESULT 

.WORD 7414 ; TEST FPS 

.WORD 7400 sRESULT FPS 
16/AC*F SRC 

CLR OF LAG 3NO INTERRUPT 

JSR R7 ,OVFSUB 300 TE 

-WORD 52525. sACO 

-WORD 52525, sF SRC 

.WORD  40200,0 sRESULT 

.WORD 7400 ; TEST FPS 

.WORD 7400 sRESULT FPS 
37/FSRC>0<ACO, ROUND 

CLR @OF LAG sNO INTERRUPT 

JSR R7.OVFSUB 300 TEST 

.WORD 77777,125252 sACO 

. WORD 0 sFSRC 

.WORD 77652,070707 RE 

.WORD 7400 s TEST FPS 

.WORD 7400 sRESULT FPS 
38/AC>0<F SRC 

CLR LAG sNO INTE T 

JSR R7 ,OVFSUB 300 TEST 

. WORD §5377,-1 3ACO 

. WORD 5300.0 sFSRC 

. WORD . sRESULT 

.WORD 0 : TEST FPS 

.WORD O sRESULT FPS 
:9/FSRC>AC>0 

CLR LAG sNO INTERRUPT 

JSR R7 ,OVFSUB :00 TEST 

.WORD 64600,1 sACO 

WORD 66600,0 sFSRC 

-WORD 36200,1 sRESULT 

.WORD O s TEST FPS 

-WORD 0 sRESULT FPS 
310/AC>FSRC>0 

CLR LAG sNO INTERRUPT 

JSR R7 ,OVF SUB 300 TEST 

.WORD 12345,156024 ACO 

. WORD 0 sF SRC 

.WORD 44745,156024 sRESULT 

.WORD 17 3 TEST FPS 

-WORD O sRESULT FPS 
311/FSRC<O 

CLR LAG sNO INTERRUPT 

JSR R7 ,OVF SUB 3:00 TEST 

. WORD 22,1010 sACO 

-WORD 140511,101010 ;FSRC 

-WORD 140072,20167 

.WORD 57 : TEST FPS 

. WORD ' T 


312/AC<0 
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FLOATING POINT TESTS 

13518 065134 005037 0030350 

13519 065140 004767 000264 

13520 065144 160077 000101 

13521 065150 040417 177777 

13S22 065154 157651 143527 

13523 065160 000007 

13524 065162 000010 

13526 065164 005037 0035050 

13527 065170 004767 000234 

13526 065174 060100 000177 

1 040300 000000 

060000 000124 

13531 065210 000040 

13532 065212 000040 

13533 

13535 065214 005037 005030 
065220 004767 

13537 665224 060100 000177 

13538 065230 040300 

13539 065234 060000 000125 

1 000000 

13541 065242 000000 

13543 065244 012737 000001 

13544 065252 004767 000152 

1354S 065256 177700 000000 
065262 000000 

133547 065266 137700 000000 

13548 065272 001100 

13549 065274 101112 

‘one 065276 000010 

13552 065300 012737 

13553 004767 000116 

13554 0653 000000 

13555 065316 177700 000000 

13556 065322 000000 

13557 065326 041100 

13558 065330 041104 

13559 065332 0 

13561 065334 012737 000001 
065 004767 000062 

13563 065346 1 

13564 065352 040377 177777 

13565 065356 100000 

13566 065362 002000 

13567 065364 102014 

13568 065366 000012 

13570 065570 012737 000001 

13571 065376 004767 000026 

13572 065402 030 025252 

13573 065406 076777 023456 

13574 065412 071525 157716 


G3. 
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003030 


003030 


003030 


003030 


CLR BOF LAG sNO INTERRUPT 

JSR R7 ,OVF SUB s00 TEST 

-WORD 160077,101 sACO 

“WORD © 40417, -1 sF SRC 

-WORD 157651,143527 sRESULT 

-WORD 7 s_ TEST FPS 

-WORD 10 sRESULT FPS 
:13/TRUNCATE TEST 

CLR. SAF LAG sNO INTERRUPT 

JSR R7 ,OVF SUB 300 TEST 

.WORD 60100,177 sACO 

. WORD 300, sF SRC 

. WORD ° sRE 

-WORD 40 s TEST FPS 

-WORD 40 sRESULT FPS 
314/ROUND TEST 

CLR BOF LAG sNO INTERRUPT 

JSR R7 ,OVF SUB 300 TEST 

-WORD 60100,177 sACO 

-WORD 40300,0 ;FSRC 

-WORD 60000, sRESULT 

-WORD O s_ TEST FPS 

-WORD 0 sRESULT FPS 
s1S/OVERFLOW, INTERRUPTS ENABLED 

MOV #1, Q0FLAG s INTERRUPT 

JSR 7, OVF SUB :00 TEST 

-WORD 177700,0 sACO 

. WORD .0 sF SRC 

-WORD 137700,0 sRESULT 

. WORD 100 ; TEST FPS 

-WORD 101112 sRESULT FPS 

. WORD 0 sFEC 
316/0VERFLOW, TRAPS DISABLED 

MOV @2 , BOF LAG 3NO INTERRUPT 

JSR R7 ,OVF SUB 3:00 TEST 

. WORD .0 sACO 

-WORD 177700,0 sF 

-WORD 0,0 T 

-WORD 41100 s TEST FPS 

-WORD 41104 sRESULT FPS 

. WORD 0 sFEC OVERFLOW 
3 17/UNDERFLOW, ENABLED, UV RESULT 

MOV 1, 80F LAG s INTERRUPT 

JSR .OVF SUB 300 TEST 

. WORD 0 3ACO 

-WORD 40377,-1 sF SRC 

-WORD 1 ol RESUL 

-WORD 2000 s TEST FPS 

-WORD 102014 sRESULT FPS 

-WORD 12 sFEC 
:18/UNDERFLOW, TRAPS ENABLED, ROUND 

MOV 61, 00FL s INTERRUPT 

JSR R7 ,OVF SUB s00 TEST 

-WORD 30325,25252 sACO 

-WORD 76777,23456 sFSRC 

WORD = 71525,157716 sRESULT 


SEQ 0239 


_H3 fe... eo | 
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; SEQ 0240 
FLOATING POINT TESTS 
13575 065416 002537 . WORD 2537 3 TEST FPS 
13576 065420 102500 . WORD 102500 sRESULT FPS 
13577 065422 000012 . WORD 12 3sFEC 
13578 H 
13579 
13580 065424 000167 000212 JP 3GO TO NEXT TEST 
13561 3 oXeXaXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXeXeXeX 
13582 3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
13563 sOIVF : 
13564 Hy —e 
13585 $ 
13586 3 FPS BEFORE EXECUTION 
13587 3 FPS AFTER EXE ION 
13588 3 (FEC) 
13589 3 
13590 3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXeXeXeX 
13591 3 @XeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaeXeXeXeXeXeXeXeXeX 
13592 3 
13593 065430 0 OVFSUB: MOV (SP)+,RS 3: RETURN ADORESS TO USE AS POINTER 
13594 065432 012737 065506 000244 MOV 0508 . BOF PVEC sREDIRECT TRAP VECTOR 
13595 065440 012702 MOV R2 sSET TO DOUBLE MODE FOR LOAD 
13596 065444 170102 LOFPS R2 sLOAD FPS 
13597 065446 010504 MOV RS,R4 sPOINT TO FSRC DATA 
13596 065450 062704 000004 ADO 04 ,R4 
13599 0654 172415 LOO CRS),ACO sLGAD ACO - TEST DATA 
13600 065456 016502 000014 MOV 14(R5), R2 sGET TEST FPS 
po 065462 170102 LOFPS Re sLOAD TEST FPS 
3 
13603 065464 174414 DIVF (R4),ACO s*TEST INSTRUCTION 
po 065466 170001 - SETF sWAIT FOR POSSIBLE FPA TRAP. 
13606 } INSTRUCTION DIDNT TRAP 
13607 065470 032737 000001 003030 BIT @1,80FLAG ;VERIFY A NO TRAP CONDITION 
13606 065476 001420 BEQ 2s sBRANCH IF GOOD 
13609 065500 104003 ERROR 3 sFPP ERROR 
sINSTRUCTION SHOULD HAVE TRAPPED 
pees 065502 000167 000032 sp 2st sREJOIN CODE 
13613 pINSTRUCTION TRAPPED 
13614 065506 032737 000001 003030 50%: BIT #1,80FLAG sSEE IF EXPECTING A TRAP 
13615 065514 001003 BNE Sis sBRANCH IF EXPECTING A TRAP 
13616 065516 3 = ERROR 3 3FPP ERROR 
13617 s INSTRUCTION WASNT SUPPOSE TO TRAP 
13616 065520 000167 000014 . sREJOIN C 
13619 065524 0 51%: MOV (SP)+,R4 sSEE IF PC = INSTRUCTION 
065526 005726 TST de sCLEAN UP STACK 
13621 065530 022704 065466 CMP @1%,R4 3 ' 
13622 065534 001401 BEQ 2s sBRANCH IF GOOD COMPARE 
13623 065536 104003 ERROR +3 sFPP ERROR 
pa sPC WAS INCORRECT 
13626 1 COMMON — FOR TRAP AND NO TRAP 
13627 065540 170203 2s: FPS R3 sSAVE FPS 
13626 065542 012702 000200 Rov #200 ,R2 sSET FPP TO DOUBLE 
065 170102 LOFPS R2 
13630 065550 012701 003142 MOV @RECOST,R1 sPOINT TO RECEIVED DATA TABLE 
13631 065554 174011 STD ACO,(R1) sSAVE ACO RESULT 





FLOATING POINT TESTS 
000016 


000010 
047576 
115314 


003030 
000020 
000020 


13665 065642 


000002 
000516 
000000 


13679 065720 


003030 


CMP 16(R5),R3 
BEQ 3% 
ERROR 3 
3%; MOV RS ,R4 
ADD #10,R4 
4%: JSR R7,DATVFR 
TST COUNT 
BEQ S$ 
ERROR 3 
S$: TST BOF LAG 
BNE 6$ 
20(RS) 
6%: STST R 
20(R5S),.R4 
oR1 
BEQ 7% 
+3 
7%: JP 22(R5) 
3 
HOP 10 
a 
: 
iTEST DIVD - 
3 
3 
° 
o 
MDIVO: 
3 
31/AC*=FSRC=0 TRAPS DISABLED 
MOV @2,B0F LAG 
JSR . 
-WORD 0,0,0,1 
-WORD 100,0,0,0 
-WORD O,0,0,1 
-WORD 40000 
-WORD 140000 
-WORD 4 
:2/FSRC*O, TRAPS ENABLED 
MOV @1,80F LAG 
JSR 7,0V0SU8 
-WORD 402,0,0,0 
-WORD 0,0,0,0 
-WORD 402,0,0,0 
-WORD 200 
. WORD 100200 


13 
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SEQ 0241 
sVERIFY STATUS 
sBRANCH IF GOOD 
3FPP ERROR 
sBAD FPS 


sPOINT TO EXPECTED DATA 
sVERIFY DATA 


sSEE IF NEED TO CHECK FEC 
sBRANCH IF NEED TO CHECK 
sRETURN FROM TEST 


sVERIFY FEC 
sBRANCH IF 
3FPP ERROR 
sBAD FEC 
sRETURN FROM TEST 


3NO INTERRUPT 
:00 TEST 

ACO 

3F SRC 

sRESULT 


3; TEST FPS 
sRESULT FPS 
FEC 


3: INTERRUPT 
300 TEST 
ACO 
sFSRC 
sRESULT 


3; TEST FPS 
sRESULT FPS 


JS | 
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SEQ 0242 
FLOATING POINT TESTS 
23685 065760 000004 -WORD 4 sFEC . 
13686 3 3/ROUND 
13687 065762 005037 003050 CLR BOF LAG sNO INTERRUPT 
13688 065766 004767 000400 JSR R7,OVOSUB 300 TEST 
13689 065772 034300 000000 000000 34300,0,0,1 ACO 
066000 000001 
13690 066002 140300 000000 900000 WORD 140300,0,0,0 sFSRC 
066010 000000 
13691 066012 134200 000000 000000 -WORD 134200,0,0,1 sRESULT 
066020 000001 
066022 -WORD 200 s TEST FPS 
13693 066024 -WORD 210 sRESULT FPS 
34/TRUNCATE 
13695 066026 CLR BOF LAG sNO INTERRUPT 
96 0660352 R7,OVOSUB “300 TEST 
13697 Soaneh 000000 34300,0,0,1 sACO 
136986 066046 000000 WORD 140300,0,0,0 sFSRC 
13699 eres | 000000 . WORD 134200,0,0,0 sRESULT 
700 066066 -WORD 240 ;_ TEST FPS 
13701 066070 -WORD 250 sRESULT FPS 
35/ROUND NEGATIVE AC, FSRC 
13703 066072 005037 003030 CLR OOF LAG sNO INTERRUPT 
13704 066076 004767 000270 JSR R7 ,OVDSUB 300 TEST 
13705 066102 177642 000000 000000 ° 177642,0,0,151 ;ACO 
066110 000151 
13706 066112 meeps 000000 000000 -WORD 166600,0,0,123 ;FSRC 
13707 066122 051242 000000 000000 WORD 51242,0,0,0 sRESULT 
137086 066132 000200 -WORD 200 ; TEST FPS 
13709 066134 000200 «WORD 200 sRESULT FPS 
13710 36/TRUNCATE NEAGTIVE AC, FSRC 
13711 066136 005037 003030 CLR BOF LAG sNO INTERRUPT 
13712 066142 004767 000224 JSR R7 ,OVOSUB :00 TEST 
13713 066146 177642 000000 000000 -WORD 177642,0,0,151 ;ACO 
066154 000151 
13714 066156 166600 000000 000000 WORD 166600,0,0,123 ;FSRC 
066164 0001235 
13715 066166 051241 177777 177777 WORD 51241,-1,-1.-1 sRESULT 
066174 177777 
13716 066176 000240 -WORD 240 3; TEST FPS 
13717 066200 000240 -WORD 240 sRESULT FPS 
13718 3 7/AC*F SRC 
13719 066202 005037 003050 CLR SOF LAG sNO INTERRUPT 
13720 066205 004767 000160 JSR R7,OVOSUB F TEST 
13721 066212 055521 047621 100353 $5521 .,47621,100333, -1 ACO 
066220 177777 
13722 066222 055521 047621 1003535 WORD 5$5521,47621,100335,-1 sF SRC 
066230 177777 
13723 066232 040200 000000 000000 «WORD 40200,0,0,0 sRESULT 
066240 000000 
13724 066242 007717 WORD 7717 :s TEST FPS 


13725 066244 007700 "WORD 7700 ;RESULT FPS 
13726 ;8/UNDERFLOW TRAPS ENABLED, UV RESULT 





K3 
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——— 


SEQ 0243 
FLOATING POINT TESTS 
13727 066246 012737 000001 0030350 MOV @1,80FLAG s INTERRUPT 
13728 066254 004767 000112 J R7 ,OVOSUB 300 TEST 
13729 066260 100200 000000 000000 -WORD 100200,0,0,0 3ACO 
066266 000000 
13730 066270 077777 000000 000000 -.WORD 77777,0,0,0 sFSRC 
066276 000000 
13731 066300 140400 100200 100200 -WORD 140400. 100200,190200, 100201 sRESULT 
066306 100201 
13732 066310 002200 -WORD 2200 3; TEST FPS 
13733 066312 102210 -WORD 102210 sRESULT FPS 
13734 066314 000012 -WORD 12 3sFEC 
13735 39/0VERFLOW TRAPS ENABLED 
13736 066316 012737 000001 0030350 MOV @1,80F LAG s INTERRUPT 
13737 066324 004767 000042 JSR R7 ,OVOSUB 300 TEST 
13738 roost 077000 123465 012346 «WORD 77000,123465,12346,525 3ACO 
13739 066340 000303 000001 140000 -WORD 303,1,140000,140001 3sF SRC 
066346 140001 
13740 epee 036650 163002 103645 -WORD 36650,163002, 103645 64003 sRESULT 
13741 066360 001700 . WORD 1700 3; TEST FPS 
13742 066362 101702 -WORD 101702 sRESULT FPS 
13743 066364 000010 -WORD 10 sFEC 
13744 : 
13745 
13746 066366 000167 000212 JP :HOP OVER SUBROUTINE 
13747 3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXeX 
pied 3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaeXeXeXeXeXeXeXeXeXeXaXeX 
1374 3 
13750 sDIVD SUBROUTINE: 
13751 3 ACO 
13752 3 FSRC 
13753 3 FPS BEFORE EXECUTION 
13754 : FPS AFTER EXECUTION 
13755 3 (FEC) 
13756 3 
13757 3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXeXeXaXeXeXeXeXeXeXeXeXeX 
ied 3 @XeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXeXeXeXeXaXeXeX 
3 
13760 066372 0O OVOSUB: MOV (SP)+,RS ; RETURN ADORESS TO USE AS POINTER 
13761 066374 012737 066450 000244 MOV 050% , BOF PVEC sREDIRECT TRAP VECTOR 
13762 066402 012702 oR2 3SET TO DOUBLE MODE FOR LOAD 
13763 066406 170102 LOFPS Re 3LOAD FPS 
13764 066410 010504 RS ,R4 sPOINT TO FSRC DATA 
13765 066412 062704 000010 ADO #10,R4 
13766 066416 172415 LOO (R5),ACO 3LOAD ACO WITH TEST DATA 
13767 016502 000030 MOV 30(R5),R2 3GET TEST FPS 
yikes 066424 170102 LOFFS R 3LOAD TEST FPS 
3 
13770 174414 OIVO CR4),ACO 3*#TEST INSTRUCTION 
ares 066430 170000 1%; CFCC ;WAIT FOR POSSIBLE FPA TRAP. 
3 
13773 s INSTRUCTION DIDNT TRAP 
13774 066432 032737 000001 003030 BIT $1,80FLAG ;VERIFY A NO TRAP CONDITION 
13775 066440 001420 BEQ es sBRANCH IF GCOD 
13776 066442 104003 ERROR +3 3;FPP ERROR 
13777 s INSTRUCTION SHOULD HAVE TRAPPED 
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11/ACO*FSAC*0 - INTERRUPTS DISABLED 
CLR BOF LAG sNO INTERRUPT 


SEQ 0244 | 
FLOATING POINT TESTS | 
13778 066444 000167 000032 JMP 2s sREJOIN CODE 
13779 
13780 INSTRUCTION TRAPPED 
13781 066450 032737 000001 903030 50%: BIT @1,80FLAG sSEE IF EXPECTING A TRAP 
137862 066456 001003 BNE 51% sBRANCH IF EXPECTING A TRAP 
13783 066460 1040035 ERROR 3 3FPP ERROR 
137684 s INSTRUCTION WASNT SUPPOSE TO TRAP 
13785 066462 000167 000014 Jp 2s sREJOIN C 
13786 066466 012604 518: MOV (SP)+,R4 }SEE IF PC = INSTRUCTION 
13787 066470 005726 TST (SP )« sCLEAN UP STACK 
13788 066472 022704 066430 CMP #1%,R4 5 
13789 066476 001401 BEQ 2s sBRANCH IF GOOD COMPARE 
13790 066500 104003 ERROR 3 3FPP ERROR 
pits} sPC WAS INCORRECT 
1 3 
13793 3COMMON CODE FOR TRAP AND NO TRAP 
13794 066502 170203 2s: STFPS R3 sSAVE FPS 
13795 066504 012702 000200 MOV R2 3SET FPP TO DOUBLE 
13796 066510 170102 LOFPS 
13797 066512 012701 003142 Mov @RECDST Ri sPOINT TO RECEIVED DATA TABLE 
13796 066516 174011 STO ACO,CRi: sSAVE ACO RESULT 
1 520 3 000032 CMP 32CRS),R3 ;VERIFY STATUS 
13800 066524 001401 BEQ 3% sBRANCH IF GOOD 
13801 066526 104003 ERROR 3 ant =~" 
a 
13803 066530 010504 38: MOV RS .R4 sPOINT TO EXPECTED DATA 
13804 066532 062704 000020 ADO #20 ,R4 
13805 066536 004767 4%: JSR R7,DATVER ;VERIFY DATA 
13806 066542 005767 114352 TST COUNT 
13607 066546 001401 BEQ 5% sBRANCH IF GOOD 
13808 066550 104003 ERROR +3 an ig 
a 

005737 003030 S$: TST BOF LAG 3SEE IF NEED TO CHECK FEC 
13811 066556 001002 BNE 6% sBRANCH IF NEED TO CHECK 

000165 000034 JP 34(RS) sRETURN FROM TEST 
13813 066564 170301 6%: STST sSAVE FE 
13814 066566 016504 000034 MOV 34(R5),R4 3;GET FEC 
138615 066572 1 R4,R1 ;VERIFY FEC 
138616 066574 001401 BEQ 7% sBRANCH IF GOOD 
13817 066576 104003 ERROR 3 3FPP ERROR 
13618 sBAD FEC 
pos 066600 000165 000036 7% JP 36(R5) ;RETURN FROM TEST 

; 

13821 066604 HOP 11 
13824 ; 
13825 
138206000 i ee ne ee ee ee eee ee ee eee eeee- 
13827 iTEST MULF 
13828 8 
13829 3 
13830 ; 
138631 $ 
13832 066604 MMULF ; 
13833 
138634 
13835 





13837 066610 


13874 066772 
3875 


1 
13876 066774 
13877 067000 


13892 067054 
13893 067060 


TESTS 
004767 
000C00 
000000 


000000 
007517 
007504 
005037 
004767 
000200 
000000 
000000 
000013 
000004 


000000 
177777 
177777 


000424 
177777 
000000 
177777 


003030 
177777 


003030 
000314 


JSR R7, MLFSUB 
.WORD 0,0 ACO 
-WORD 0,0 sF SRC 
-WORD 0,0 
-WORD 7517 
.WORD 7504 
32/AC>FSRC=0 - INTERRUPTS ON 
CLR BOF LAG 
JSR R7 , MLFSUB 
-WORD 200,0 # ;ACO 
.WORD 0,0 3F SRC 
.WORD 0,0 
-WORD 13 
.WORD 4 
33/AC*0 FSRC>0 - 
CLR BOF LAG 
JSR R7 MLE 
-WORD 100.0 ;ACO 
-WORD 300.0 ;FSRC 
-WORD 0,0 
.WORD 7500 
.WORD 7504 
34/AC*#1 >FSRC - ROUND 
CLR 88F LAG 
JSR R7 , MLFSUB 
-WORD 40200,0 ;ACO 
-WORD 40177,-1 
-WORD 40177,-1 
-WORD O 
-WORD O 
35/TRUNCATE 
CLR SOF LAG 
JSR R7 .MLFSUB 
-WORD 40177,-1 
. WORD 0 3FSRC 
-WORD 40177,-1 
.WORD 40 
.WORD 40 
36/NORMAL IZE 
CLR SOF LAG 
JSR R7 .MLFSUB 
-WORD 40100,0 ;ACO 
-WORD 40100,0 ;FSRC 
. WORD 0 
-WORD 12 
-WORD O 
3 7/7ROUND 
CLR BOF LAG 
JSR R7 ,MLFSUB 
-WORD 17500,0 ;ACO 
-WORD 23652,125252 
. WORD 3177,-1 
. WORD 7417 
. WORD 7400 
38/AC>0>FSRC ROUND 
CLR QF LAG 
JSR R7 ,MLFSUB 


M3 ss 
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300 TEST 
sRESULT 
; TEST FPS 
sRESULTANT FPS 
3NO INTERRUPT 
300 TEST 


;RESULT 
; TEST FPS 
sRESULTANT FPS 


sNO INTERRUPT 
300 TEST 


sRESULT 
3; TEST FPS 
;RESULTANT FPS 


sNO INTERRUPT 
300 TEST 


3sFSRC 


sRESULT 
3; TEST FPS 
sRESULTANT FPS 


3NO INTERRUPT 
300 TEST 
ACO 


sRESULT 
; TEST FPS 
sRESULTANT FPS 


sNO INTERRUPT 
300 TEST 


sRESULT 
3 TEST FPS 
sRESULTANT FPS 


3NO INTERRUPT 
:00 TEST 


3sFSRC 

sRESULT 

: TEST FPS 
sRESULTANT FPS 


i1NO INTERRUPT 
3:00 TEST 








COKDACO KDJ11-8 CLUSTER 


FLOATING POINT 


TESTS 


040342 
176543 
176711 
007500 


007510 


177777 
025252 
067324 


000000 
177776 
177776 


003030 
000204 


000000 
177776 
177776 


000001 
000116 
177777 
000000 


177777 


003030 


003020 


N3 
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-WORD 40342,-1 ACO 
-WORD 176543,025252 ;FSRC 
-WORD 176711,67324 ;RESULT 
.WORD 7500 ; TEST FPS 
.WORD 7510 s;RESULTANT FPS 
:9/IAC<FSRC<0, ROUND 
CLR BOF LAG 3NO INTERRUPT 
JSR R7 ,MLFSUB 300 TEST 
-WORD 144600,0 3ACO 
-WORD 154000,0 sF SRC 
-WORD 60400,0 s;RESULT 
. WORD 17 ; TEST FPS 
.WORD O ;RESULT FPS 
;10/AC<FSRC, ROUND 
CLR BOF LAG ;NO INTERRUPT 
JSR R7 .MLFSUB 300 TEST 
. WORD 60000, 0 ACO 
. WORD 140377 ,177776 3F SRC 
-WORD 160177,177776 sRESULT 
.WORD 17 ; TEST FPS 
.WORD 10 ;RESULT FPS 
311/AC>O>F SRC, TRUNCATE 
CLR BOF LAG 3NO INTERRUPT 
JSR R7, MLFSUB 300 TEST 
. WORD 60000 , 0 ;ACO 
. WORD 140377177776 3F SRC 
. WORD 160177 ,177776 sRE 
.WORD 7547 3; TEST FPS 
.WORD 7550 ;RESULT FPS 
;12/UNDERFLOW, NC INTERRUPTS 
MOV @2 ,80F LAG ;NO INTERRUPT 
JSR R7 .MLFSUB 300 TEST 
WORD 200.1 ACO 
-WORD 200.1 3F SRC 
. WORD e ;RESULT 
-WORD 42117 ; TEST FPS 
-WORD 142100 sRESULT FPS 
-WORD 12 3F 
;13/0VERFLOW, TRAP 
MOV @1,80FLAG 3; INTERRUPT 
JSR MF 300 TEST 
. WORD 177777,-1 ;ACO 
.WORD 40300, :F SRC 
-WORD 100077,-1 ;RESULT 
-WORD 1117 :s TEST FPS 
. WORD 101116 sRESULT FPS 
-WORD 10 FEC 
;14/0VERFLOW NO TRAP 
MOV @2 , BOF LAG ;NO INTERRUPT 
JSR R7 , MLFSUB 300 TEST 
.WORD 77700,0 3ACO 
.WORD 77700,0 ;F SRC 
-WORD 0,0 RESULT 
-WORD 40117 ; TEST FPS 
-WORDB 40106 sRESULT FPS 
. WORD c 


10 iFE 
;1S/UNDEFINED VARIABLE IN FSRC, TRAP ENABLED 
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TESTS 


170001 


000001 
000026 
000000 


000000 
000000 


000212 


067456 
000200 


000004 
000014 


sRE 
3 TEST FPS 
sRESULT FPS 


s INTERRUPT 
300 TEST 
sACO 

sF SRC 

SULT 


TURN ADDRESS TO USE AS POINTER 
sREDIRECT TRAP VECTOR 
sSET TO DOUBLE MODE FOR LOAD 


sLOAD —_ 
sLOAD ACO: WITH TEST DATA 
sPOINT TO FSRC DATA 


sGET TEST FPS 
sLOAD TEST FPS 


s@TEST INSTRUCTION 
sWAIT FOR POSSIBLE FPA TRAP. 


sVERIFY A NO TRAP CONDITION 
sBRANCH IF GOOD 


sFPP ERROR 
s INSTRUCTION OAD went TRAPPED 


sREJOIN C 


sSEE IF EXPECTING A TRAP 
iORANCH IF EXPECTING A TRAP 


sFPP ERROR 


s INSTRUCTION WASNT SUPPOSE TO TRAP 


sREJOIN CODE 
sSEE IF PC = INSTRUCTION 
rCLEAN UP STACK 


1BRANCH IF GOOD COMPARE 


003030 MOV @1,@0FLAG 
JSR R7 ML FSUB 
-WORD 123465,0 
-WORD 100022,0 
«WORD 123465,0 
-WORD 4000 
-WORD 104000 
-WORD 14 sFEC 
3 
sP HOP 12 
3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXex 
3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXex 
3 
3 ACO 
3 FSRC 
3 FPS BEFORE EXECUTION 
8 FPS AFTER EXECUTION 
3 (FEC) 
3 
3g eoXeXeXeXeXeXeXeXoXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXexX 
3 
MLFSUB: MOV (SP )+ RS 
000244 MOV 50+, Cc 
MOV e 
LOFPS R2 
LOO (R5),ACO 
MOV RS RA 
ADD @4 RA 
MOV 14( RS) ,R2 
LOFPS R2 
3 
MULF (R4),ACO 
: $: SE TF 
3 } INSTRUCTION DIONT TRAP 
003030 BIT 01, 80F LAG 
BFa 2s 
ERROR 3 
JP 2s 
LINSTRUCT ION TRAPPED 
003030 50%: BIT 01, S0FLAG 
CE 518% 
ERROR o3 
JP 26 
518: MOV (SP )+,R4 
TsT (SP )- 
chp #16 ,R4 
BEQ 26 
ERROR 3 


$ 
sCOMMON CODE FOR TRAP AND NO TRAP 


3FPP ERROR 
sPC WAS INCORRECT 


C4 
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FLOATING POINT TESTS 


SEQ 0248 


14008 067510 170205 2s: STFPS R3 sSAVE FPS 
14009 067512 012702 000200 MOV 0200 ,R2 3SET FPP TO DOUBLE 
14010 067516 170102 LOFPS R2 
14011 067520 012701 003142 MOV @RECOST .R1 sPOINT TO RECEIVED DATA TABLE 
14012 067524 174011 sTOd ACO, CRI) sSAVE ACO RESULT 
14013 067526 026503 000016 Cop 16(RS),R3 sVERIFY STATUS 
14014 067532 001401 BEA 3¢ sBRANCH IF GOOD 
14015 067534 1040035 ERROR 3 3FPP ERROR 
14016 3B8AD FPS 
14017 067536 010504 38: MOV RS ,R4 sPOINT TO EXPECTED DATA 
14018 067540 062704 000010 ADD @10,R4 
14019 067544 004767 045626 4$; JSR R7 .DATVFR sVERIFY DATA 
14020 06 005767 113344 TST COUNT 
14021 067554 001401 BFO 5s sBRANCH IF GOOD 
14022 067556 104003 3 pF PP 
14023 3sBAD ACO 
14024 067560 005737 003030 5$: TST BEF LAG sSEE IF NEED TO CHECK FEC 
14025 067564 001002 GNE 6% sGRANCH IF NEED - CHECK 
14026 067566 000165 000020 JP 20 }RE TURN FROM TES 
14027 3s VERIFY STATUS 
14026 067572 170301 6%: STST R1 sSAVE FEC 
14029 067574 016504 000020 20( RS). R4 3sGET FEC 
06 1 R4,R1 sVERIFY FEC 
14031 067602 001401 BEQ 7$ 3 IF 
14032 067604 {04003 «3 3FPP ERROR 
140. sBAD FEC 
14034 067606 000165 000022 76: 22e(R5) sRETURN FROM TEST 
14035 067612 HOP 12 
140 3 
14039 } 
14040 Brrr ee ree een nn cee eee e nee e ee ---- 
14041 3sTEST MULD 
14042 3 
14043 b 
14044 3 
14045 3 
14046 067612 MPULD: 
14047 
14048 
14049 31/AC*0 
14050 067612 005037 003030 CLR SOF LAG 3NO INTERRUPT 
14051 067616 004767 000554 JSR R7 .MLOSUB 300 TEST 
1 atha 4 000100 000000 -WORD 100,0,0,.0 3ACO 
14053 067632 .000411 177777 WORD 411,-1,0,1 sF SRC 
067640 000001 
14054 067642 000000 000000 -WORD 0,0,0,0 sRESULT 
067650 000000 
14055 067652 000200 -WORD 200 s TEST FPS 
14056 067654 000204 -WORD 204 sRESUL TANT FPS 
14057 32/F SRC=0 
14056 067656 005037 003030 BOFLAG sNO INTERRUPT 
14059 067662 004767 000510 JSR R7 , MLOSUB 300 TEST 
14060 067666 077777 .WORD 77777,0,0,0 3ACO 
0676 000000 
14061 067676 000000 000000 woRD 0,0,0,0 ;FSRC 
0677 000900 
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14062 067706 
067714 
14063 067716 
14064 067720 
14065 
14066 067722 
14067 067726 
14068 067732 
067740 000000 
14069 067742 000277 
067750 
14070 067752 
067760 
14671 067762 
pot | 067764 


140 

14074 067766 

14075 067772 

14076 067776 
070004 


000000 


003030 
000444 
000000 
177777 


177777 


003030 
000400 
000000 
177777 
177777 


003030 
000334 
177777 


4069 
14090 070076 


14100 070152 
070160 
14101 070162 
070170 
14102 070172 
070200 
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000000 


000000 
177777 
177777 


000000 
177777 
177777 


177777 
000000 
000000 


000000 
125252 
177777 


D4 


SEQ 0249 

-WORD 0,0,0,0 sRESULT 

«WORD 7700 s TEST FPS 

-WORD 7704 sRESULTANT FPS 
33/AC#1 

CLR LAG sNO INTERRUPT 

JSR R7 ,MLOSUB 300 TEST 

. WORD 40200,0,0,0 sACO 

-WORD 277,-1,-1,-1 sF SRC 

. WORD 277,-1,-1,.-1 sRESULT 

-WORD 7717 s TEST FPS 

-WORD 7700 sRESULTANT FPS 
34/AC>FSRC>O, TRUNCATE 

CLR BF LAG 3NO INTERRUPT 

JSR R7 ,MLOSUB 300 TEST 

-WORD 65500,0,0,1 sACO 

-WORD 37577,-1,-1.-2 sFSRC 

-WORD 65077,-1,-1.-1 sRESULT 

-WORD 7717 s TEST FPS 

-WORD 7700 sRESULTANT FPS 
35/AC<FSRC<O 

CLR BOF LAG 3NO INTERRUPT 

JSR R7 ,MLOSUB 300 TEST 

. WORD 137577,-1,-1.-2 ACO 

. WORD 165400,0,.0.1 sFSRC 

«WORD 65000,0,.0,0 sRESULT 

-WORD 7717 s TEST FPS 

-WORD 7700 sRESULTANT FPS 
36/AC>FSRC>0 

CLR BOF LAG sNO INTERRUPT 

JSR R7 ,MLOSUB 300 TEST 

-WORD 17500,0,0,0 sACO 

-WORD 123652,125252, 125252, 125252 sFSRC 

. WORD 103177,-1,-1,-1 sRESULT 

-WORD 200 3s TEST FPS 

-WORD 210 sRESULTANT FPS 
3 7/UNDERFLOW, TRAPS DISABLED 

CLR BOF LAG sNO INTERRUPT 

JSR R7 , MLOSUB 300 TEST 

. WORD 300,0,.0,252 :ACO 

-WORD 377,1.2.3 sF SRC 

-WORD 0,0,0,0 sRESULT 


i AR 0rd eS Fo ctesiicantntep he anaes 
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14103 070202 

14104 070204 

14105 

14106 070206 

14107 070214 

14108 070220 
0226 


070366 
: 070370 


32 
070372 
am 


14146 

14147 070376 
14148 070400 
14149 070406 
14150 070412 


TESTS 


005740 
005744 


012737 
76 


170102 


003030 
000110 
177777 
177777 


017777 


000212 


070454 
000200 


177777 
177777 


003030 


117777 


Ov244 


.WORD 5740 ; TEST FPS 

“WORD 5744 ;RESULT FPS 
:8/UNDERFLOW, TRAP ENABLED 

MOV 1, 80F LAG p INTERRUPT 

JSR R7,MLDSUB 300 TEST 

.WORD 100277,1,2,-1 3ACO 

.WORD  100300,1,1,1 iF SRC 

.WORD  40417,40001,77403,0 sRESULT 

.WORD 2217 ; TEST FPS 

“WORD 102200 ;RESULT FPS 

.WORD 12 iFEC 
:9/0VERFLOW, TRAPS DISABLED 

CLR BOF LAG ;NO INTERRUPT 

JSR R7,MLOSUB 300 TEST 

. WORD hatha oka 3ACU 

. WORD 40200,-1,-1.,-1 sF SRC 

.WORD 0,0,0,0 ;RESULT 

.WORD 6740 ; TEST FPS 

“WORD 6746 ;RESULT FPS 
310/0VERFLOW, TRAPS ENABLED 

MOV 01, O0FLAG s INTERRUPT 

JSR ,MLOSUB 300 TEST 

.WORD 157700,25252.25252,25252 sACO 

.WORD  167700,0,0,0 sF SRC 

.WORD 7420,017777,117777,117777 ;RESULT 

.WORD 1240 ; TEST FPS 

.WORD 101242 ;RESULT FPS 

“WORD 10 FEC 
é 

se HOP13 


3 oXeXeXeXeXeXeXeXeXeXeXeXaXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXeX 
3 oXeXeXeXeXeXeXeXeXaXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXex 


; 
ACO 


FSRC 
FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
(FEC) 


3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
3 XeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 


é 
MLOSUB: MOV (SP)+,RS 
MOV 50% , BOF PVEC 
Vv oR2 
LOFPS R2 


3 RETURN ADORESS TO USE AS POINTER 
}REDIRECT TRAP VECTOR 
3SET TO DOUBLE MODE FOR LOAD 
3LOAD FPS 
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FLOATING POINT 


14151 


070414 


TESTS 


170011 


000010 
000030 


003142 


000036 


003030 


LOO CRS), ACO sLOAD ACO WITH TEST DATA 
MOV R5,R1 sPOINT TO FSRC DATA 
ADO #10,R1 
MOV 30(RS),R2 sGET TEST FPS 
LOFPS Re sLOAD TEST FPS 
; 
MULD €R1),ACO s*TEST INSTRUCTION 
ti SETD sWAIT FOR POSSIBLE FPA TRAP. 
LINSTRUCTION DIONT TRAP 
BIT #1, 80FLAG ;VERIFY A NO TRAP CONDITION 
es sBRANCH IF GOOD 
+3 3FPP ERROR 
s INSTRUCTION SHOULD HAVE TRAPPED 
Jp 2s sREJOIN CODE 
}INSTRUCTION TRAPPED 
50%: BIT 01, 80FLAG sSEE IF EXPECTING A TRAP 
BNE 1s sBRANCH IF EXPECTING A TRAP 
ERROR +3 sFPP ERROR 
s INSTRUCTION WASNT SUPPOSE TO TRAP 
Jp sREJOIN CODE 
51%: MOV (SP )+,R4 sSEE IF PC = INSTRUCTION 
TST (SP )- sCLEAN UP STACK 
CMP @1% ,R4 
BEQ 2s S BRANCH IF GOOD COMPARE 
«3 3FPP ERROR 
3sPC WAS INCORRECT 
’ 
3COMMON CODE FOR TRAP AND NO TRAP 
2s: STFPS RS sSAVE FPS 
MOV #200 ,R2 sSET FPP TO DOUBLE 
LOFPS R2 
MOV CDST,R1 sPOINT TO RECEIVED DATA TABLE 
STO aco,(R1) sSAVE ACO RESULT 
CMP 32(R5),.R3 sVERIFY STATUS 
BEQ AT sBRANCH IF GOOD 
ERROR «3 3FPP ERROR 
3sBAD FPS 
3%: MOV RS .R4 sPOINT TO EXPECTED DATA 
ADD 20 ,R4 
4$: JSR R7 ,DATVER sVERIFY DATA 
TST C T 
BEQ S$ sBRANCH IF GOOD 
ERROR 3 sFPP ERROR 
sBAD ACO 
S$: TST BOF LAG 3SEE IF NEED TO CHECK FEC 
BNE 6% sBRANCH IF NEED TO CHECK 
JP 34(R5) ;RETURN FROM TEST 
s;VERIFY ERROR STATUS 
6%: STST R sSAVE FEC 
MOV 34(RS) RO 3;GET FEC 
CMP R4,R1 sVERIFY FEC 
BEQ 7% sBRANCH IF GOOD 
ERROR 3 sFPP ERROR 
3BAD FEC 
7$: JMP 36(R5) s;RETURN FROM TEST 


} 
a 


SEQ 0251 





Prt 070610 


14218 


14257 070766 
14258 
14259 070770 


14263 071010 
14264 071014 
14265 071020 
14266 071022 


TESTS 


COKDACO KDJ11-8 CLUSTER DIAG. 
FLOATING POINT 


003030 
177777 
003030 
000374 
125252 


000000 
0C0000 
177777 
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iTEST MOOF 
3 
Q 
a 
4 
MMOOF : 
i 
317AC*0 FSRC=0 ; 
CLR BEF LAG sNO INTERRUPT 
R7 , MOF SUB 300 TEST 
WORD 100,0 3ACO 
-WORD 12 °° sF SRC 
-WORD 0,0 sFRACTIONAL RESULT 
-WORD 0,0 sINTEGER RESULT 
-WORD 13 3 TEST FPS 
WORD 4 sRESULTANT FPS 
32/FSRC=0 
CLR BEF LAG 3NO INTERRUPT 
JSR R7 , MOF SUB 300 TEST 
-WORD 12356.-1 3ACO 
-WORD 0,0 3sF SRC 
-WORD 0,0 sFRACTIONAL RESULT 
-WORD 0,0 sINTEGER RESULT 
WORD 3 s TEST FPS 
.WORD 4 sRESULTANT FPS 
33/AC=0 
CLR B*"LAG 3sNO INTERRUPT 
JSR R7 , MDF SUB 300 TEST 
-WORD O, sACO 
-WORD -1,-1 sFSRC 
-WORD 0,0 SFRACTIONAL RESULT 
-WORD 0,0 s INTEGER RESULT 
-WORD 7500 3 TEST FPS 
-WORD 7504 sRESULT FPS 
34/AC>FSRO>0 
CLR BEFLAG 3sNO INTERRUPT 
JSR R7 , MOF SUB 3:00 TEST 
~ WORD om 3ACO 
-WORD 40300,0 ;FSRC 
-WORD 0,0 sFRACTIONAL RESULT 
WORD 46377,-1 s INTEGER RESULT 
-WORDB 13 3 TEST FPS 
-WORD 4 sRESULTANT FPS 
15/AC>FSRC>0 
CLR BOF LAG sNO INTERRUPT 
JSR R7 , MOF SUB 300 TEST 
-WORD 77652,125252 3ACO 
-WORD 40300,0 ;FSRC 
-WORD 0,0 sFRACTIONAL RESULT 
WORD 77777,-1 s INTEGER RESULT 
WORD O :; TEST FPS 
-WORD 4 sRESULTANT FPS 


sscetieheasnastiten nani epeeidiiaeeteniannttinaisienemnmaipamenpmienmeminiindteel 
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SEQ 0253 
FLOATING POINT TESTS | 
14267 | 
14268 16/AC>OCF SRC, INTEGERS | 
14269 071024 005037 003030 CLR BOF LAG sNO INTERRUPT | 
14270 071030 004767 000340 JSR «RT, MOF SUB 100 TEST | 
14271 071034 000000 - WORD sACO 
14272 071040 147400 025700 :WORD —147400,25700 sFSRC 
14273 071004 -WORD 0,0 :FRACTIONAL RESULT 
14274 071050 025700 ;WORD —170000,25700 sINTEGER RESULT 
14275 071054 007400 -WORD 7400 1 TEST FPS 
14276 071056 007404 .WORD 7404 iRESULT FPS 
77 1 7/AC<O<FSRC, FRACTIONAL 
14278 071060 005037 003030 CLR = BOFLAG sNO INTERRUPT 
14279 971064 004767 JSR «RT, MOF SUB 100 TEST 
14280 071070 100227 177777 .WORD 100227, -1 sACO 
14281 071074 044025 -WORD 44025, iF SRC 
14282 071100 104061 021251 “WORD 10406121251 iFRACTIONAL RESULT 
14283 071108 000000 -WORD 0, sINTEGER RESULT 
14284 071110 000000 WORD : TEST FPS 
14285 071112 000010 WORD sRESULT FPS 
18/ACCO>FSAC, TRUNCATE 
14287 071114 005037 003030 CLR BOFLAG yNO INTERRUPT 
14288 071120 004767 000250 JSR «RT, MOF SUB :00 TEST 
14289 071124 125252 .WORD 46252, 125252 sACO 
14290 071130 040300 000000 :WORD — 40300,0 iF SRC 
14291 071134 000000 -WORD 0,0 sFRACTIONAL RESULT 
14292 071140 046377 177777 “WORD © 46377,-1 sINTEGER RESULT 
14293 071144 000053 -WORD 53 1 TEST FPS 
14294 071146 000044 -WORD 44 sRESULT FPS 
s9/ROUND INTEGER 
14296 071150 005037 003030 P AG sNO INTERRUPT 
14297 071154 004767 000214 JSR «RT, MOF SUB :00 TEST 
14298 071160 125252 - WORD 125252 sACO 
14299 071164 040300 000000 :WORD — 40300,0 iF SRC 
14300 071170 000000 -WORD 0,0 {FRACTIONAL RESULT 
14301 071174 046377 177777 -WORD  46377,-1 sINTEGER RESULT 
07 000013 - WORD 1 TEST FPS 
14303 071202 WORD sRESULT FPS 
re s10/TRUNCATE. FRACTION 
14305 071204 005037 003030 CLR = AFLAG sNO INTERRUPT 
14306 071210 004767 000160 JSR «RT, MOF SUB 100 TEST 
14307 071214 040777 177777 .WORD 40777, -1 sACO 
14308 071220 ;WORD — 40200,0 1FSRC 
14309 071224 040177 177770 “WORD © 40177,177770 :FRACTIONAL RESULT 
14310 071230 040740 :WORD  40740,0 LINTEGER RESULT 
14311 071234 000000 “WORD 0 1 TEST FPS 
14312 071236 000000 -WORD 0 sRESULT FPS 
1431 411/ROUND INTEGER 
14314 071240 005037 003030 cL LAG 1NO INTERRUPT 
14315 071244 004767 000124 JSR «RT, MOF SUB 100 TEST 
14316 071250 000000 000000 -WORD 0,0 sACO 
14317 071254 000000 000000 -WORD 0,0 iF 
14318 071260 000000 000000 “WORD 0,0 iFRACTIONAL RESULT 
14319 071264 000000 000000 ;WORD 0,0 sINTEGER RESULT 
14320 071270 000000 ‘WORD 0 1 TEST FPS 
14321 071272 000004 WORD iRESULT FPS 
14322 §12/ROUND FRACTION 
14323 071274 005037 003030 CLR = BOF LAG sNO INTERRUPT 
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14380 


: 
s INSTRUCTION TRAPPED 


FLOATING POINT TESTS 
14324 071300 004767 000070 JSR R7 , MOF SUB 300 TEST 
14325 071304 040225 125252 -WORD 40225,125252 ~ 
14326 071310 066652 052525 -WORD 66652,52525 sFSRC 
14327 071314 000000 000000 . WORD 0,0 iFRACTIONAL RESULT 
14326 071320 066707 025160 -WORD 66707,25160 s INTEGER RESULT 
14329 071324 007027 . WORD 7027 3 TEST FPS 
14330 071326 007004 . WORD 7004 sRESULT FPS 
14331 ; /OVERFLOW 
14332 071330 012737 000001 003030 MOV @1,80FLAG s INTERRUPT 
14333 071336 004767 000032 JSR R7 . MOF SUB 300 TEST 
14334 071342 076000 000000 . WORD 76000 ,O 3ACO 
14335 071346 076000 000000 . WORD 76000 ,O 3sF SRC 
14336 071352 000000 000000 -WORD 0,0 sFRACTIONAL RESULT 
14337 071356 033600 000000 . WORD 33600 ,0 s INTEGER RESULT 
14338 071362 001000 . WORD 1000 3 TEST FPS 
14339 071364 101006 . WORD 101006 sRESULT FPS 
eeeen 071366 000010 . WORD 10 3sFEC 
H 
oak 071370 000167 000254 JP HOP 14 
1 
14344 3 @XeXeXeXeXeXeXeXeXeXeXeXeXeXeX aeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
open 3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXeXeXeXeXeXeXeXeXex eX 
16 3 
14347 3 ACO 
14348 3 FSRC 
14349 3 FRACTIONAL RESULT 
14350 3 INTEGER T 
14351 3 FPS ORE EXECUTION 
14352 3 FPS AFTER EXECUTI 
14353 3 CFEC) 
14354 3 
14355 3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
pts 3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXeXeXeXsXaXeXeXeX 
3 
14358 071374 0O MOF SUB: MOV (SP)+,R5 3s RETURN ADORESS TO USE AS POINTER 
14359 071376 012737 071460 000244 MOV 050% , B@F PVEC }REDIRECT TRAP VECTOR 
14360 071404 012702 MOV #200 ,R2 3sSET 73 DOUPLE MODE FOR LOAD 
14361 071410 170102 LOFPS Re sLOAD FPS 
14362 071412 172415 LOO CR5),ACO sLOAD ACO WITH TEST DATA 
14363 071414 012701 071640 MOV oR1 ‘ates KNOWN INTO AC1 
14364 071420 172511 LOO (R1),AC1 
14365 071422 010501 MOV RS,R1 iPOINT TO FSRC DATA 
14366 071424 062701 000004 ADD @4,R1 
14367 071430 016502 000020 MOV 20(RS),R2 3sGET TEST FPS 
os 071434 170102 LOFPS Re 3LOAD TEST FPS 
$ 
14370 071436 171411 MOOF CR1),ACO s*TEST INSTRUCTION 
pth 071440 7 ae SETF sWAIT FOR POSSIBLE FPA TRAP. 
14373 bINSTRUCTION DIONT TRAP 
14374 071442 032737 000001 003020 BIT @1,80FLAG ;VERIFY A NO TRAP CONDITION 
14375 071450 001420 et sBRANCH IF GOOD 
14376 071452 104003 ERROR +3 3sFPP ERROR 
14377 sINSTRUCTION SHOULD HAVE TRAPPED 
pedis 071454 000167 000032 JMP 2s sREJOIN CODE 


J4 
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SEQ 0255 
| FLOATING POINT TESTS 
14381 071460 032737 000001 003030 50$: BIT @1,80FLAG sSEE IF EXPECTING A TRAP 
14382 071466 0010035 BNE 51% sBRANCH IF EXPECTING A TRAP 
14383 071470 104003 ERROR +3 3FPP ERROR 
14384 s INSTRUCTION WASNT SUPPOSE TO TRAP 
14385 071472 000167 000014 JMP 2s sREJOIN CODE 
14386 071476 0O 518: MOV CSP)+,R4 ;SEE IF PC = INSTRUCTION 
14387 071500 005726 TST CSP )+ ;CLEAN UP STACK 
14388 071502 022704 071440 CMP 41% ,R4 ; 
14389 071506 001401 BEQ 2s sBRANCH IF GOOD COMPARE 
14390 071510 104003 ERROR +3 3FPP ERROR 
14391 sPC WAS INCORRECT 
14392 3 
14393 3CGMMON CODE FOR TRAP AND NO TRAP 
14394 071512 170203 2s: STFPS R3 sSAVE FPS 
14395 071514 012702 000200 MOV #200 ,R2 sSET FPP TO DOUBLE 
14396 071520 170102 LOFPS R2 
14397 071522 012701 003142 MOV @RECDST,R1 sPOINT TO RECEIVED DATA TABLE 
14398 sSAVE FRACTIONAL RESULT 
14399 071526 174011 STO AcO,C(R1) sSAVE ACO RESULT 
14400 071530 503 000022 CMP 22(R5),R3 ;VERIFY STATUS 
14401 071534 001401 BEQ 3% sBRANCH IF GOOD 
14402 071536 104003 3 3;FPP ERROR 
14403 ;BAD FPS 
14404 071540 010504 3% MOV RS ,R4 sPOINT TO EXPECTED DATA 
14405 071542 062704 000010 ADO #10,R4 
14406 071546 004767 043624 4$: JSR R7,DATVFR ;VERIFY DATA 
14407 071552 005767 111342 TST COUNT 
14406 071556 001401 BEQ 5$ ;BRANCH IF GOOD 
14409 071560 104003 3 3FPP ERROR 
14410 sBAD ACO 
14411 ;SAVE INTEGER RESULT 
14412 071562 174111 S$: STO ACi,CR1) sSAVE AC1 RESULT 
14413 071564 01 MOV RS ,R4 sPOINT TO EXPECTED 
14414 071566 062704 000014 ADO #14,R4 
14415 071572 004767 043600 JSR R7,OATVFR ;VERIFY DATA 
14416 071576 005767 111316 TST COUNT 3 
14417 071602 001401 GEQ 6% sBRANCH IF GOOD 
14418 071604 104003 ERROR +3 3sFPP ERROR 
14419 sBAD AC1 
14420 071606 005737 003030 6%: TST SOF LAG ;SEE IF NEED TO CHECK FEC 
14421 071612 001002 BNE 7% sBRANCH IF NEED TO CHECK 
14422 071614 000165 000024 24(RS) sRETURN FROM TEST 
14423 071620 170301 7$: STST 1 sSAVE FEC 
14424 071622 016504 000024 MOV 24(R5),R4 3sGET FEC 
14425 071626 1 CMP R4,R1 ,; VERIFY FEC 
14426 071630 001401 BEQ 8% sBRANCH IF GOOD 
14427 071632 104003 ERROR +3 3FPP ERROR 
14428 ;BAD FEC 
cooks 071634 000165 000026 8s JP 26(R5) ;RETURN FROM TEST 
$ 
14431 071640 177777 177777 177777 MODGAR: .WORD -1,-1,-1,-1 s;KNOWN DATA FOR AC1 
071646 177777 
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SEQ 0256 
FLOATING POINT TESTS 
14439 3TEST MOOD 
14440 3 
14441 3 
14442 H 
14443 3 
14444 071650 MMODD : 
14445 
14446 3 
14447 31/AC>FSRC#0 
14448 071650 005037 003030 CIR @OF LAG 3sNO INTERRUPT 
14449 071654 004767 001164 J R7 ,MOOSUB 3:00 TEST 
14450 071660 012345 177777 177777 -WORD 12345,-1,-1.-1 ;ACO 
071666 177777 
14451 071670 000100 000000 000000 -WORD 100,0,0,0 sF SRC 
071676 000000 
14452 071700 000000 000000 000000 WORD 0,0,0,0 sFRACTIONAL RESULT 
071706 000000 
14453 071710 000000 000000 000000 -WORD 0,0,0,0 s INTEGER RESULT 
071716 000000 
14454 071720 000200 -WORD 200 3; TEST FPS 
14455 071722 000204 -WORD 204 sRESULTANT FPS 
14456 32/AC=0<F SRC 
14457 071724 005037 003030 CLR OF LAG 3NO INTERRUPT 
14456 071730 004767 001110 JSR R7 ,MDOSUB 300 TEST 
14459 071734 000000 000000 000000 -WORD 0,0,0.0 ;ACO 
071742 000000 
14460 071744 001234 177777 000000 -WORD 1234,-1,0,0 3sFSRC 
071752 000000 
14461 Srivee 000000 000000 000000 -WORD 0,0,0,0 sFRACTIONAL RESULT 
14462 071764 000000 000000 000000 -WORD 0,0,0,0 s INTEGER RESULT 
071772 000000 
14463 071774 007717 -WORD 7717 ; TEST FPS 
14464 071776 007704 -WORD 7704 sRESULTANT FPS 
14465 33/AC>FSRC>0 
14466 072000 005037 0030350 CLR SOF LAG sNO INTERRUPT 
14467 072004 004767 001034 JSR R7, MDOSUB 300 TEST 
14468 072010 056252 125252 125252 -WORD 56252,125252,125252,125250 3:ACO 
072016 125250 
14469 072020 040300 000000 000000 -WORD 40300,0,0,0 3sF SRC 
072026 000000 
14470 072030 000000 C00000 000000 -WORD 0,0,0,0 sFRACTIONAL RESULT 
072036 000000 
14471 072040 056377 177777 177777 -WORD 56377,-1,-1,-4 s INTEGER RESULT 
072046 177774 
14472 072050 000213 -WORD 213 3 TEST FPS 
14473 072052 -WORD 204 sRESULTANT FPS 
14474 34/AC<O>F SRC 
14475 072054 005037 003030 CLR ROFLAG 3NO INTERRUPT 
14476 072060 004767 000760 JSR R7 ,.MDOSUB 3:00 TEST 
14477 072064 140240 000000 000000 -WORD 140240,0,0,0 3ACO 
072072 000000 
14478 ap peg at 146314 133572 -WORD 63714,146314,133572,167737 3F SRC 
14479 072104 000000 000000 000000 -WORD 0,0,0,0 sFRACTIONAL RESULT 
072112 000000 
14480 072114 163777 177777 162531 -WORD 163777,-1,162531,125726 ; INTEGER RESULT 
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FLOATING POINT TESTS 


072122 


14488 072160 


14495 072214 
072222 

14496 072224 
072232 

14497 072254 
2242 


072306 
14506 072310 
072316 
14507 oreene 
072326 
14508 072330 
14509 072332 
14510 
14511 072334 
14512 072340 
14513 072344 
072352 
14514 072354 
072362 
14515 072364 
072372 
14516 072374 
072402 
14517 072404 
14516 072406 


14519 
14520 072410 


177777 
003030 
000554 


900000 
177777 


003030 
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125252 
000000 
000000 
177777 


125252 
000000 
177777 
000000 


L4 


a ee 


° 210 3; TEST FPS 
-WORD 204 sRESULTANT FPS 
35/AC>FSRC>0 
CLR BOF LAG sNO INTERRUPT 
JSR R7,MDOSUB 3:00 TEST 
. WORD .0,0,1 ACO 
. WORD 40340,0,0,0 3F SRC 
-WORD 0,0,0,0 sFRACTIONAL RESULT 
-WORD 56340,0,0,1 s INTEGER RESULT 
-WORD 213 ; TEST FPS 
-WORD 204 sRESULTANT FPS 
36/TRUNCATE 
CLR SF LAG sNO INTERRUPT 
JSR R7,MDOSUB 300 TEST 
-WORD 56252,125252,125252, 125252 3ACO 
-WORD 40300,0,0,0 3FSRC 
-WORD 0,0,0,0 sFRACTIONAL RESULT 
-WORD 56377,-1.,-1.-1 s INTEGER RESULT 
-WORD 253 ; TEST FPS 
-WORD 244 sRESULT FPS 
37/TRUNCATE FRACTION 
CLR map AL sNO INTERRUPT 
JSR 7, MDOSUB 3:00 TEST 
. WORD 23252, 125252 ,125252 , 125252 ACO 
-WORD 40300,0,0,0 sF SRC 
WORD 23377,-1.-1.-1 sFRACTIONAL RESULT 
-WORD 0,0,0,0 s INTEGER RESULT 
-WORD 2535 ; TEST FPS 
-WORD 240 sRESULT FPS 
38/ROUND INTEGER 
CLR BEF LAG 3sNO INTERRUPT 
JSR R7,MDOSUB 300 TEST 
. WORD 76600 ,0,0,125252 3ACO 
. WORD 40300,.0,0,0 3F SRC 
-WORD 0,0,0,0 sFRACTIONAL RESULT 
-WORD 76700,0,0,-1 s INTEGER RESULT 
-WORD 200 3; TEST FPS 
-WORD 204 sRESULT FPS 
39/ROUND 1 tact FRACTION 
CLR BOF LAG sNO INTERRUPT 
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FLOATING POINT TESTS 


14521 072414 004767 000424 JSR R7,MDDSUB 300 TEST 

14522 y thorn 041525 052525 052525 -WORD 41525,052525 ,52525,52525 ;ACO 

14523 073830 040300 000000 000000 -WORD 40300,0,0,0 sF SRC 

072436 000000 

14524 072440 040177 177777 #177777 -WORD 40177,-1,-1,177740 sFRACTIONAL RESULT 
072446 177740 

14525 072450 041636 000000 000000 -WORD 41636,0,0,0 s INTEGER RESULT 
072456 000000 

14526 072460 007700 -WORD 7700 ; TEST FPS 

14527 072462 007700 -WORD 7700 sRESULT FPS 

14526 :/0VERFLOW, TRAPS ENABLED 

14529 072464 012737 000001 0030350 MOV @1,Q0FLAG s INTERRUPT 

14530 072472 004767 000346 JSR R7,MODSUS 3:00 TEST 

14531 072676 177777 177777 «(177777 WORD -1,-1,-1,-1 ;ACO 
072504 177777 

14532 072506 040400 000000 000000 -WORD 40400,0,0,0 sF SRC 
072514 000000 

14533 072516 000000 000000 000000 -WORD 0,0,0,0 sFRACTIONAL RESULT 
072524 000000 

14534 072526 100177 177777 177777 -WORD 100177,-1,-1.-1 s INTEGER RESULT 
0725384 177777 

14535 072536 007700 .WORD 7700 3s TEST FPS 

14536 072540 107706 . WORD _ sRESULT FPS 

14537 072542 000010 . WORD sFEC 

14538 ; INTEGER GePred 7 TO S56 BITS 

14539 072544 005037 0030350 CLR BOF LAG sNO INTERRUPT 

14540 072550 004767 000270 JSR 7, MDOSUB 300 TEST 

14541 072554 056700 000000 000000 . WORD $6700,0-0,-1 3ACO 
072562 177777 

14542 072564 044446 177777 177777 -WORD 44440,-1,-1.-1 3F SRC 
O72572 177777 

14543 072574 000000 000000 000000 -WORD 0,0,0,0 sFRACTIONAL RESULT 
072602 000000 

14544 072604 063161 100000 000001 -WORD 63161,100000,1,40775 s INTEGER RESULT 
072612 040775 

14545 072614 000200 -WORD 200 ; TEST FPS 

14546 072616 000204 -WORD 204 sRESULT FPS 

14547 3 /OVERFL LOw, TRAPS DISABLED 

14548 072620 012737 000002 003030 MOV 02, 80F LAG sNO INTERRUPT 

14549 072626 004767 000212 JSR R7 ,MDOSUB 3:00 TEST 

14550 072632 066600 000000 000000 -WORD 66600,0,0,0 ACO 

72640 000000 

14552 072652 000000 000000 000000 -WORD 0,0,0,0 sFRACTIONAL RESULT 

14553 072662 015200 000000 000000 -WORD 15200,0,0,0 s INTEGER RESULT 
072670 000000 

14554 072672 047700 -WORD 47700 3s TEST FPS 

14555 072674 147706 «WORD 147706 sRESULT FPS 

14556 072676 000010 -WORD 10 sFEC 

14557 3; /UNDERFLOW, TRAPS DISABLED 

14558 072700 012737 000002 003030 MOV @2 , BOF LAG sNO INTERRUPT 

14559 072706 004767 000132 JSR R7 ,MDOSUB 300 TEST 

14560 072712 100277 000001 000002 -WORD 100277,1,2.-1 ACO 


072720 177777 


COKDACO KDJ11-8 CLUSTER DIAG. 
FLOATING POINT TESTS 
14561 072722 100300 000001 
072730 
14562 072732 000000 000000 
072740 
14563 072742 000000 000000 
072750 
14564 072752 005200 
14565 072754 


S6 

14568 072760 012737 000001 

14569 072766 004767 000052 

14570 072772 100277 000001 
073000 

14571 073002 100300 000001 
073010 

14572 073012 040417 040001 
073020 000000 

14573 073022 900000 000000 
073030 

14574 073032 002200 


14575 073034 102200 
14576 073036 000012 


012605 
14595 073046 012737 073130 
000200 


14599 073064 012701 071640 


14602 073074 062701 000010 
000040 


14606 073106 171411 
14607 073110 170011 


1 
14610 073112 032737 000001 
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SEQ 0259 

000001 -WORD 100300,1,1,1 sF SRC 
000000 WORD 0,0,0,0 sFRACTIONAL RESULT 
000000 -WORD 0,0,0,0 s INTEGER RESULT 

-WORD 5200 ; TEST FPS 

-WORD 5204 sRESULT FPS 

—. sFEC 

;/UNDERFLOW TRAPS ENABLED, UV AS RESULT 

003030 MOV 01, Q0F LAG s INTERRUPT 

JSR R7 ,MODSUB :00 TEST 
000002 -WORD 100277,1.2.-1 sACO 
000001 -WORD 100300,1,1,1 sFSRC 
077403 -WORD 40417,40001,77403,0 sFRACTIONAL RESULT 
000000 -WORD 0,0,0,0 s INTEGER RESULT 

-WORD 2200 ;_ TEST FPS 

-WORD 102200 sRESULT FPS 

-WORD 12 sFEC 


003030 


3; JUMP OVER SUBROUTINE 


JP 
3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXeXeXeX 


ACO 


SUL 
FPS BEFORE EXECUTION 
4 Bog TER EXECUTION 


H 
3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 


MDOSUB: MOV CSP )+,RS 3 RETURN ADDRESS TO USE AS POINTER 
MOV 050% , BOF PVEC }REDIRECT TRAP VECTOR 
mov #200 ,R2 sSET TO DOUBLE MODE FOR LOAD 
LOFPS R2 sLOAD FPS 
L0O CRS), ACO sLOAD ACO WITH TEST DATA 
MOV @MODGAR ,R1 sLOAD KNOWN INTO AC1 


3 
16: 


; 
s INSTRUCTION DIDNT TRAP 
BIT @1,@0F LAG ;VERIFY A NO TRAP CONDITION 


LOO (R1),AC1 
MOV RS,R1 


3 
. sPOINT TO FSRC DATA 
ADO 10,R1 


FSRC 
FRACTIONAL RESULT 
INTEGER RESULT 


MOV 40(RS),R2 :GET TEST FPS 
LOFPS) §R2 ;LOAD TEST FPS 

MODD (R1),ACO ;@TEST INSTRUCTION 

SETD ;WAIT FOR POSSIBLE FPA TRAP. 
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14611 073120 001420 BEQ eb sBRANCH IF GOOD 
14612 073122 104903 ERROR +3 1 FPP 
14615 s INSTRUCTION SHOULD HAVE TRAPPED 
poets 073124 000167 000032 JP 2s sREJOIN CODE 
1461 
14616 pINSTRUCTION TRAPPED 
14617 073130 032737 000001 003030 50%: BIT @1,80F LAG sSEE IF EXPECTING A TRAP 
14616 073136 0010035 BNE 51% sBRANCH IF EXPECTING A TRAP 
14619 073140 104003 ERROR +3 iF PS ERROR 
14620 s INSTRUCTION WASNT SUPPOSE TO TRAP 
14621 073142 000167 000014 wep 2s sREJOIN CODE 
14622 0731 012604 518: MOV (SP )+,R4 sSEE IF PC = INSTRUCTION 
14623 073150 005726 TST CSP )-« rCLEAN UP STACK 
14624 073152 022 073110 CMP #18 ,R4 
14625 073156 001401 BEQ 2s SBRANCH IF GOOD COMPARE 
14626 073160 1 3 +3 sFPP ERROR 
14627 sPC WAS INCORRECT 
14626 3 
14429 sCOMMON CODE FOR TRAP AND NO TRAP 
14630 073162 170203 2s: STFPS RS sSAVE FPS 
14631 073164 012702 000200 MOV #200 ,R2 3SET FPP TO DOUBLE 
14632 073170 170102 R2 
14633 073172 012701 003142 MOV @RECDST .R1 sPOINT TO RECEIVED DATA TABLE 
sSAVE FRACTIONAL RESULT 
14635 073176 174011 STO ACO,CR1) sSAVE ACO RESUL 
0 000042 RS), sVERIFY STATUS 
14637 073204 001401 BEQ 3% sBRANCH IF GOOD 
14638 073206 104003 3 aa — 
8 
14640 073210 010504 38: MOV RS ,R4 sPOINT TO EXPECTED DATA 
14641 073212 062704 000020 REND 20 ,R4 
14642 073216 004767 042172 4$: JSR R7 .OATVER ;VERIFY DATA 
14643 073222 005767 107672 TST T 
0 001401 BEQ 53% sBRANCH IF GOOD 
14645 073230 1040035 «3 sFPP 
1 sBAD ACO 
14647 sSAVE INTEGER RESULT 
14648 073232 174111 : sto ACi,(R1) sSAVE AC1 RESULT 
14649 073234 01 MOV 2R4 sPOINT TO EXPECTED 
14650 073236 062704 000030 ADO 030 ,R4 
004767 042146 JSR R7 .DATVER sVERIFY DATA 
14652 073246 005767 107646 TST 3 
14653 073252 001401 BFa 6% sBRANCH IF GOOD 
14654 073254 1040035 03 ans a 
3 
14656 073256 005737 0030350 68: TST BOFLAG 3SEE IF NEED TO CHECK FEC 
14657 073262 001002 BNE 7% sBRANCH IF NEED TO CHECK 
14656 0 000165 000044 wre 44(RS) s;RETURN FROM TEST 
14659 073270 170301 78: STST R1 sSAVE FEC 
14660 073272 016504 000044 MOV 44(RS),R4 3:GET FEC 
14661 073276 020401 CHP Ri ; VERIFY FEC 
14662 075 001401 BEQ 8s sBRANCH IF GOOD 
14663 073302 104003 ERROR +3 sFPP eae _ 
3 
ed 073304 000165 000046 6s; JP 46(R5) sRETURN FROM TEST 
4666 $ 
14667 073310 HOP 15; 


7 
14678 073310 


1 
14706 073450 
14707 073454 


14709 073474 
14710 073476 
14711 
14712 
14713 073500 
14714 
14715 
14716 


000170 
000000 


000140 
177777 
177777 


000110 
177777 


177777 


177777 
000000 


100000 


C5 
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SEQ 0261 


sTEST STCFD 
8 
i 
i 
$ 
NSFO: 
é 
31/AC*0 
JSR R7, SFOSUB 300 TEST 
. WORD 0177,0,0,1 3ACO 
. WORD 0,0,0,0 sRESULT 
-WORD 47557 s TEST FPS 
-WORD 47544 sRESULT FPS 
32/AC>0, TRUNCATE 
JSR R7 , SFOSUB 300 TEST 
° 77577,-1,-1.-1 3ACO 
. WORD 77577,-1.0,0 sRESULT 
-WORD 7540 3s TEST FPS 
-WORD 7540 sRESULT FPS 
33/AC<0, ROUND 
JSR R7, SFOSUB 300 TEST 
.WORD 100377,-1,100000,0 3ACO 
. WORD 100377, -1.0,0 sRESULT 
-WORD 7517 3s TEST FPS 
-WORD 7510 sRESULT FPS 
34/AC=-0 
JSR R7, SFOSUB 300 TEST 
. WORD 100000 .0,0,0 3ACO 
. WORD 0.0.0.0 sRESULT 
-WORD 7757 s TEST FPS 
.WORD 7744 sRESULT FPS 
35/AC<O 
JSR R7, SFOSLB 300 TEST 
-WORD 125252,125252, 125252, 125252 sACO 
. WORD 125252 ,125252,0,0 sRESULT 
-WORD O 3s TEST FPS 
-WORD 10 sRESULT FPS 


sGET OVER SUBROUTINE 


HOP 16 
g OXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXex 
pg oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeox 


sSTCFO 


COKDACO KDJ11-8 CLUSTER DIAG. 


FLOATING POINT TESTS 


1 
14774 073610 
14775 073614 


9 
073610 


005037 
004767 


073602 000244 
000200 


003142 
000020 


003030 
000220 


DS 


MACRO M1200 16-OCT-84 16:38 PAGE 7-244 
3 acd 
3 RESULT 
3 FPS BEFORE EXECUTION 
; FPS AFTER EXECUTION 


TTHERE CAN BE NO 


SEQ 0262 


TRAPS WITH THE STCFD INSTRUCTI 


poXoXeheXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
5 OXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 


5 

SFOSUB: MOV (SP )+,RS 
MOV 050%, Cc 
MOV @200 ,R2 
LOFPS R2 
L0O (RS), ACO 
MOV @RECDST .R1 
MOV 20( RS), R2 
LOFPS 

i: 

40%: STCFD ACO,(R1) 


é 

s INSTRUCTION DIONT TRAP 
sVERIFY STATUS 

2s: TFPS 


sREDIRECT TRAP VECTOR 
DOUBLE MODE FOR LOAD 


sLOAD TEST FPS 
s*TEST INSTRUCTION 


| 
3 RETURN ADORESS TO USE AS POINTER 
s R3 sSAVE FPS 
22( RS) ,.R2 3:GET EXPECTED STATUS 
oR3 sVERIFY STATUS 
BEQ 3% sBRANCH I 
3 3FPP ERROR 
38AD FPS 
3%: MOV R5,R4 sPOINT TO EXPECTED DATA 
re 8) #10,R4 
43: tl aa ;VERIFY DATA 
BEQ 5% sBRANCH IF GOOD 
ERROR 3 3FPP ERROR 
sBAD ACO 
S$: sep 24(R5) sRETURN FROM TEST 
s INSTRUCTION TRAPPED 
50%: ERROR +3 3FPP ERROR 
s INSTRUCTION WASNT SUPPOSE TO TRAP 
Jp 24(RS) ;RETURN FROM TEST 
F 
HOP 16: 
$ 
3 
3 weeneeeceeneneee ee eee ewe eee reer ee eee 
sTEST STCOF 
$ 
F 
3 
F 
MSOF ; 
31/AC*0 


3NO INTERRUPT 
300 TEST 
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FLOATING POINT TESTS 
14776 073620 000177 000000 
073626 000000 
14777 073630 000000 000000 
14778 073634 000200 
14779 073636 000204 


14780 
14781 073640 005037 003030 


14795 073720 012737 000001 
000106 
14797 073732 O77777 177777 


14809 074002 012737 000002 

000024 

14811 074014 077777 177777 
900000 

14812 074024 000000 000000 


a 
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000000 WORD 177,0,0,0 3ACO 
.WORD 0,0 sRESULT 
.WORD 200 s TEST FPS 
.WORD 204 sRESULT FPS 
32/AC#-0 
CLR Bef LAG sNO INTERRUPT 
JSR R7, SOF SUB 300 TEST 
000200 -WORD 100000, 300,200,100 3 
-WORD 0,0 sRESULT 
.WORD 7777 s TEST FPS 
.WORD 7744 sRESULT FPS 
33/AC>0, TRUNCATE 
CLR BOF LAG 3NO INTERRUPT 
JSR R7 , SOF SUB 300 TEST 
177777 -WORD 5$5555,55555.-1.-1 3ACO 
-WORD 5$5555,55555 sRESULT 
-WORD 240 3s TEST FPS 
-WORD 240 sRESULT FPS 
34/AC<9, ROUND TO UNDEFINED VARIABLE 
003030 MOV @1,80F LAG s INTERRUPT 
JSR R7 , SOF SUB 3:00 TEST 
100000 WARD 77777,-1,100000,0 3ACO 
-WORD 0,0 sRESULT 
-WORD 1200 3s TEST FPS 
-WORD 101206 sRESULT FPS 
35/AC<0, ROUND 
CLR BeF LAG 3sWO INTERRUPT 
JSR R7, SOF SUB 300 TEST 
125252 -WORD 125252.125252, 125252. 125252 3ACO 
-WORD 125252.125255 sRESULT 
-WORD 7700 s TEST FPS 
-WORD 7710 sRESULT FPS 
36/ROUND TO UV, TRAPS DISABLED 
003030 MOV 02, BOF LAG s INTERRUPT 
JSR R7, SOF SUB 300 TEST 
177777 WORD 77777,-1,-1.0 3ACO 
-4ORD 6700 s TEST FPS 
-WORD 6706 sRESULT FPS 
3 
JP HOP 17 3GET OVER SUBROUTINE 


3 

3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
g oXeXeXeXeXoXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaeXeXeX 
sSTCOF 


ACO 


RESULT 
FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 


SEQ 0263 
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SEQ 0264 

FLOATING POINT TESTS 

14827 : 

14826 3A TRAP CAN ONLY OCCUR IF ROUNDING CAUSES OVERFLOW 

14829 3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 

14830 s eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXex 

14831 : 

14832 074040 012605 SOFSUB: MOV (SP)+,RS s_ RETURN ADORESS TO USE AS POINTER 

14833 074042 012737 074116 000244 MOV 050% , BOF PVEC ;REDIRECT TRAP VECTOR 

14834 074050 012702 000200 MOV #200 ,R2 sSET TO DOUBLE MODE FOR LOAD 

14835 074054 170102 LOFPS Re LOAD FPS 

14836 074056 172415 LOO CRS), ACO sLOAD ACO WITH TEST DATA 

14837 074060 012701 003142 MOV @RECDST ,R1 sPOINT TO RESULT AREA 

14838 074064 016502 000014 MOV 14(R5) ,.R2 sGET TEST FPS 

14839 074070 170102 LOFPS R2 sLOAD TEST FPS 

14840 3 

14841 074072 176011 40%: STCOF ACO,(R1) s*¢TEST INSTRUCTION 

14842 074074 170327 1%: STST (PC > sWAIT FOR POSSIBLE FPA TRAP. 

prety 074076 000000 -WORD O sSTORE STATUS HERE. 

1 

14845 SINSTRUCTION DIONT TRAP 

14846 074100 032737 000001 0030350 BIT @1,80F LAG :VERIFY A NO TRAP CONDITION 

14847 074106 001420 BEQ 2s sBRANCH IF GOOD 

14848 074110 104003 ERROR +3 sFPP ERROR 

14849 s INSTRUCTION SHOULD HAVE TRAPPED 

ane 074112 000167 000032 JP 2s sREJOIN CODE 

14852 ; INSTRUCTION TRAPPED 

14853 074116 032737 000001 0030350 50%: BIT @1,80F LAG sSEE IF EXPECTING A TRAP 

14854 074124 001003 BNE 5 sBRANCH IF EXPECTING A TRAP 


1$ 
14855 074126 104003 ERROR +3 sFPP ERROR 
14836 s INSTRUCTION WASNT SUPPOSE TO TRAP 


14857 074130 000167 000014 JP 2s sREJOIN CODE 

14856 074134 012604 51%: MOV (SP )+,R4 sSEE IF PC = INSTRUCTION 
14859 074136 005726 YST (SP )-+ rCLEAN UP STACK 

14860 074140 022704 074074 CMP #18 ,R4 

14861 074144 001401 BEQ 2s S BRANCH IF GOOD COMPARE 
14862 074146 104003 ERROR +3 3FPP 

14863 3PC WAS INCORRECT 

14654 + 

14865 3sCOMMON CODE FOR TRAP AND NO TRAP 

14866 i VERIF Y STATUS 

14867 074150 170203 2s: STFPS R35 sSAVE FPS 

14868 074152 016502 000016 MOV 16(RS),R2 3GET EXPECTED STATUS 
14869 074156 0202035 CMP R2,R3 sVERIFY STATUS 

14870 074160 001401 BEQ 3% sBRANCH IF GOOD 

14871 074162 104003 ERROR +3 sFPP ERROR 

14872 3B8AD FPS 

148673 074164 010504 3%: MOV RS,R4 sPOINT TO EXPECTED DATA ‘ 
14874 074166 062704 000010 ADO #10,R4 

14875 074172 004767 041200 4s; JSR R7 ,DATVFR ;VERIFY DATA 
14876 074176 005767 106716 TST COUNT 

14877 074202 001401 BEQ S$ sBRANCH IF GOOD 

14878 074204 104003 ERROR +3 sFPP ERROR 

14879 sBAD ACO 

1486860 074206 005737 003050 5%; TST OOF 1. AG 3SEE IF NEED TO CHECK FEC 
14881 074212 001002 BNE 7$ sBRANCH IF NEED ay CHECK 
14882 074214 000165 000020 JP 20(RS) TRE TURN FROM TEST 


14883 sVERIFY FEC 


14884 074220 


14915 074266 
14916 074272 
14917 074274 


8 
14919 074276 


1 
co 074276 


14938 074310 
14939 074312 


TESTS 
12704 
4 


003122 
000010 


06.020 


140000 


78: MOV @RECFEC ,R4 


STST (R4) 
CMP (R4),#10 
BEQ 8s 
ERROR +3 

8s Jp 20(RS) 


MSFOI 
3 
MOV #40000 ,R1 
LOFPS Ri 
STCFD ACO,AC6 
TFPS 
STST R 
CMP #140000 ,R2 
BEQ $ 
ERROR 3 
1%: CMP @2,R3 
BEQ 2s 
ERROR +3 
2s: 
é 
a 
3 
3 -s<«e een eee eee eee eee eee eee 
sTEST CLRO 
° 
4 
$ 
4 
MCLRO: 
i 
MOV @TAB47 ,R1 
MOV #200 ,R4 
LOFPS R4 
LOO (R1),ACO 
MOV @RECDST.R 
STO ACO,CR1 ) 
CLRO CR 1) 
MOV OTARG.R 
JSR RT ° BATVER 
TST COUNT 
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sPOINT Ls FEC AREA 


sSAVE FEC 
;VERIFY FEC FOR OVERFLOW 
sBRANCH IF GOOD 
3FPP ERROR 
3BAD FEC 


sDISABLE INTERRUPTS 


$ 
s*TEST ILLEGAL INSTRUCTION 
sSAVE STATUS 


sBRANCH IF ERROR RECEIVED 
sFPP E 


RROR 
sFER BIT NOT SET ON ILLEGAL INST. 
sVERIFY FEC = FLOATING OPCDOE ERROR 
3;BRANCH IF GOOD 


3FPP ERROR 
sFEC INCORRECT 


sPOINT TO DATA 
3SET FPP STATUS TO DOUBLE 


‘ 

sPOINT TO DATA BUFFER 
sSTORE GARBAGE 

sCLEAR DATA BUFFER 
sVERIFY BUFFER =0 

3 





Giic -H5 
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FLOATING POINT TESTS 


14945 074336 
14946 074340 


BEQ is 
104003 ERROR +3 


170202 1%: 


sBRANCH I RECDST = 0 

3—FPP ERROR 

sRECDST NOT CLEARED 

R2 sSAVE STATUS 

CMP R2, 0204 sVERIFY STATUS 

BEQ 26 sBRANCH IF GOOD 
ERROR +3 sFPP ERROR 

14952 sBAD STATUS 


sDISABLE INTERRUPTS 
sLOAD STATUS 

CLRO R6 ts of at WITH ILLEGAL ACC 
STFPS R3 3SA 


140200 


3 
sTEST LOFPS, STFPS MODE 1 
14991 3 
14992 ; 
14993 F 

3 


14995 074410 
14997 , 


000244 


@TSTLOC,.R4 
#147757 ,(R4) 
CST,R 


@RECST ,R1 
10% , B@FPVEC 
(R4) 

(R1) 
R4,@TSTLOC 
1% 


sPOINT R4 TO RAM 
sSETUP EXPECTED STAT 


SET 


BUFFER FOR (ReceIveD STATUS 


sSETUP TRAP VECT 
s*TEST INSTRUCTION 
s*TEST INSTRUCTION 


sVERIFY R4 


sBRANCH IF GOOD 
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003132 


000006 


15062 074574 
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003132 147757 


145557 


I5 


ee ee ee - 


ERROR +3 3FPP ERROR 
1%: CMP R1, @RECST sVERIFY R1 
BEQ 2s sBRANCH IF GOOD 
ERROR +3 3FPP ERROR 
sBAD R1 
2s: CMP GORECST , 0147757 sVERIFY STATUS 
BEQ 3% sBRANCH F GOOD 


3 


Jp 3$ 
sUNEXPECTED TRAP 
10%: MOV (SP)+,RO 


3%: 


sTEST LOFPS, STFPS MODE 2 
: 


MLS2: 


@TSTLOC ,R4 
#145557 ,(R4) 
@RECST.R1 
#108 , B@F PVEC 
CR4)> 

CR1)-« 

R4, @TSTLOC<2 
is 

3 

R1, ORECST+2 
2s 

3 


MOV 
MOV 
MOV 
MOV 
LOFPS 
STFPS 
CoP 
BEQ 
ERROR 
16: CMP 
BEQ 
ERROR 
CMP @eRECST , 0145557 
BEQ 3 
ERROR 
sep 
TED TR 
MOV 
MOV 
ERROR 


' 
sBAD STATUS\ 
sGET OVER TRAP 


sSAVE PC 
sSAVE PS 


sFPP ERROR 
sUNEXPECTED TRAP 


sPOINT R4 TO RAM 

sSETUP EXPECTED STATUS 

3;SET BUFFER FOR RECEIVED STATUS 
} SETUP TRAP VECTOR 

seTEST INSTRUCTION 

,eTEST Saracrsm 


; VERIFY R4 
;BRANCH IF GOOD 
;FPP ERROR 
3 
;VERIFY R1 
sBRANCH IF GOOD 
FPP 
3B8AD Ri 
;VERIFY STATUS 
;BRANCH F GOOD 
3;FPP ERROR 
;BAD STATUS\ 
;GET OVER TRAP 
;SAVE PC 
;SAVE PS 
FPP 


ERROR 
sUNEXPECTED TRAP 
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SEQ 0268 
FLOATING POINT TESTS 
15067 3 
15068 8 
000 0 2. kk eeeReweseneessesoscceesessonaeEs 
15070 ;TEST LOFPS, STFPS MODE 3 
15071 F 
15072 3 
15073 3 
| 45074 , 
| 35075 074574 MLS3 
| TBo77 
F 
15078 074574 012704 003162 MOV @TSTLOC .R4 sPOINT R4 TO RAM 
15079 074600 012737 003166 003162 MOV @TSTLOC +4, B@TSTLOC sTSTLOC= DEFERRED ADDRESS 
1 07 012737 147501 003166 MOV pte Sent Saati sSETUP EXPECTED STATUS 
150861 074614 012701 003172 MOV @TSTLOC+10, 3R1 POINTS TO TSTLOC+10 
1 07 012737 003132 003172 MOV SRECST Oe TS TL0C+10 3SET DEFERRED BUFFER FOR RECEIVED STATUS 
150863 074626 012737 074676 000244 MOV #10% , BOF PVEC 3SETUP TRAP VECTOR 
15064 074634 170134 LOFPS @(R4)+ s*TEST INSTRUCTION 
| 15085 074636 170231 STFPS @(R1)-+ 3*#TEST INSTRUCTION 
15086 074640 003164 CMP R4, @TSTLOC+2 sVERIFY R4 
15087 074644 001401 BEQ 1% sBRANCH IF GOOD 
fonep 074646 104003 3 3FPP ERROR 
15090 074650 020127 003174 1$: CMP R1,@TSTLOC+12 sVERIFY R1 
15091 074654 001401 BEQ rz} sBRANCH IF GOOD 
15092 074656 104003 «3 3FPP 
15093 3BAD R1 
15094 074660 023727 003132 147501 2%: CMP @ORECST , 0147501 ;VERIFY STATUS 
1 07. 001406 BEQ 3% ;BRANCH F GOOD 
15096 074670 104003 ERROR 3 3FPP ERROR 
15097 :BAD STATUS\ 
15096 074672 000167 000006 JP 3% ;GET OVER TRAP 
15099 sUNEXPECTED TRAP 
15100 074676 012600 10%: MOV (SP)+, sSAVE PC 
15101 074700 012605 MOV (SP)+, s;SAVE PS 
15102 074702 104003 ERROR +5 ;FPP ERROR 
1510 sUNEXPECTED TRAP 
15104 074704 3%: 
15105 
15106 
15109 2 
| 15110 : 
| 15111 Brrr re re ne nn nee nn en een n en eee- 
15112 sTEST LOFPS, STFPS MODE 4 
| 15113 : 
15114 5 
15115 : 
15116 3 
15117 074704 MLS4: 
| 45118 
15119 3 
15120 074704 012704 003164 MOV @TSTLOC+2,R4 sPOINT R4 TO RAM 
15121 074710 012737 147757 003162 MOV #147757 , @@TSTLOC sTSTLOC= STATUS ADDRESS 
| 15122 074716 012701 003134 MOV @RECST+2,R1 3SET BUFFER FOR RECEIVED STATUS 
| 15123 074722 012737 074772 000244 MOV #106 , BOF PVEC ) SETUP TRAP VECTOR 
| 15124 074730 170144 LOFPS -(R4) s*TEST INSTRUCTION 
15125 074732 170241 STFPS -(R1) 3#TEST INSTRUCTION 





KS 
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SEQ 0269 
FLOATING POINT TESTS 
15126 074734 020427 003162 CMP R4,@TSTLOC ;VERIFY R4 
15127 074740 001401 BEQ 1$ sBRANCH IF GOOD 
15128 074742 104003 ERROR 3 3FPP ERROR 
15129 $ 
15130 074744 020127 003132 1%: CMP R1,@RECST ;VERIFY Ri 
15131 074750 001401 BEQ 2s sBRANCH IF GOOD 
15132 074752 1040035 ERROR rs.) 3FPP ERROR 
1513535 3BAD R1 
15134 074754 023727 003132 147757 2%: CMP @ORECST , 0147757 sVERIFY STATUS 
15135 074762 001406 BEQ 3% sBRANCH F GOOD 
15136 074764 104003 ERROR 3 3FPP ERROR 
15137 3BAD STATUS\ 
15138 074766 000167 000006 JP 3% sGET OVER TRAP 
15139 sUNEXPECTED TRAP 
15140 074772 012600 10%: MOV (SP)+,RO sSAVE PC 
15141 074774 012605 MOV (SP)+,RS sSAVE PS 
15142 074776 104003 ERROR 3 3sFPP ERROR 
15143 sUNEXPECTED TRAP 
15144 075000 3%: 
15145 
15146 
15149 3 
15150 3 
be) he) 
15152 ;TEST LOFPS, STFPS MODE 5S 
15153 3 
15154 3 
15155 3 
15156 3 
15157 075000 MLSS 
15158 
15159 3 
15160 075000 012704 003164 MOV @TSTLOC+2,R4 sPOINT R4 TO RAM 
15161 075004 012737 003166 003162 MOV @TSTLOC +4, B@TSTLOC sTSTLOC= DEFERRED ADDRESS 
15162 075012 012737 147501 003166 MOV #147501 ,@@TSTLOC +4 sSETUP EXPECTED STATUS 
15163 075020 012701 003174 MOV @TSTLOC+12,R1 sR1 POINTS TO 412 
15164 075024 012737 003132 003172 MOV @RECST , B@TSTLOC+10 :SET DEFERRED BUFFER FOR RECEIVED STATUS 
15165 075032 012737 075102 000244 MOV 10% , BeF PVEC 3;SETUP TRAP VECTOR 
15166 170154 LOFPS @-(R4) 3*TEST INSTRUCTION 
15167 075042 170251 STFPS @-(R1) 3*TEST INSTRUCTION 
15168 075044 003162 CMP R4, @TSTLOC ;VERIFY R4 
15169 075050 001401 BEQ 1$ sBRANCH IF GOOD 
Ite 075052 104003 ERROR 3 3;FPP ERROR 
3 
15172 075054 020127 003172 18: CMP R1,@TSTLOC+10 ;VERIFY R1 
15173 075060 001401 BEQ 2s ;BRANCH IF GOOD 
15174 075062 104003 ERROR 3 3FPP ERROR 
15175 ;BAD R1 
15176 075064 023727 003132 147501 2%: CMP @ORECST , 0147501 ;VERIFY STATUS 
15177 075072 001406 BE 3% ;BRANCH F GOOD 
15178 075074 104003 ERROR 3 ;FPP ERROR 
15179 ;BAD STATUS\ 
15180 075076 000167 000006 JP 3¢ 3GET OVER TRAP 
15161 sUNEXPECTED TRAP 
15162 075102 012600 10%: MOV (SP)+,RO ;SAVE PC 
15183 075104 012605 MOV (SP )+,RS ;SAVE PS 


15164 075106 104003 ERROR +3 sFPP ERROR 





LS 
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15165 sUNEXPECTED TRAP 
15166 075110 3%: 
15187 
15188 
15191 3 
15192 3 
15195 _ i yagi agi ag al i i aa 
15194 ;TEST LOFPS, STFPS MODE 6 
15195 3 
15196 3 
15197 3 
15198 3 
15199 075110 MLS6: 
15200 
15201 3 
15202 075110 012704 003162 MOV @TSTLOC .R4 sPOINT R4 TO RAM 
15203 075114 012737 140001 003166 MOV #140001 , B@TSTLOC +4 SETUP EXPECTED STATUS 
15204 075122 012701 003272 MOV @TSTLOC+110,R1 3R1 WILL POINT TO TESTLOC+10 
15205 075126 012737 0O 000244 MOV 0108 , @@F PVEC 3SETUP TRAP VECTOR 
15206 075134 170164 LOFPS  4(R4) s*TEST INSTRUCTION 
15207 075140 1 177700 STFPS -100(R1) s*TEST INSTRUCTION 
15208 075144 003162 CMP R4, OTSTLOC sVERIFY R4 
15209 075150 001401 BEQ 1% sBRANCH IF GOOD 
istry 075152 104003 ERROR +3 3sFPP ERROR 
3 
15212 075154 020127 003272 1%: cep R1, @TSTLOC +110 sVERIFY R1 
15213 075160 001401 BEQ 2s sBRANCH IF GOLD 
15214 075162 104003 ERROR +3 3FPP ERROR 
15215 sBAD R1 
15216 075164 023727 003172 140001 2%: CMP @eTSTLOC +10, #140001 sVERIFY STATUS 
15217 075172 001406 BEQ 3% ;BRANCH F GOOD 
15218 075174 104003 ERROR +3 3FPP ERROR 
15219 3B8AD STATUS\ 
1 075176 000167 000006 JP 3g ;GET OVER TRAP 
1522 ;UNEXPECTED TRAP 
15222 075202 012600 108: MOV (SP )+,RO sSAVE PC 
15223 075204 012605 MOV (SP )+,RS sSAVE PS 
1 075206 104003 ERROR +3 3FPP ERROR 
15225 sUNEXPECTED TRAP 
15226 075210 3% 
15227 
15228 
15231 3 
15232 3 
18235 = = — gemmewe ere e crc cece cee cee c eee eene 
15234 ;TEST LOFPS, STFPS MODE 7 
15235 : 
15236 ; 
15237 : 
15238 ; 
15239 075210 MLS7 
15240 
15241 F 
15242 075210 012704 003262 MOV @TSTLOC+100,R4 ;POINT R4 TO RAM 
15243 075214 012737 003166 003162 mov @TSTLOC +4, B@TSTLOC sTSTLOC= DEFERRED ADDRESS 
15244 075222 012737 145501 003166 MOV #145501 ,@@TSTLOC +4 sSETUP EXPECTED STATUS 
15245 075230 012701 003072 MOV @TSTLOC-70,R1 :R1 POINTS TO TSTLOC+10 
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SEQ 0271 
FLOATING POINT TESTS 
15246 075234 012737 003172 003164 MOV @TSTLOC +10, @@TSTLOC+2 3 
15247 075242 012737 075316 000244 MOV #108 , BeF PVEC ;SETUP TRAP VECTOR 
15248 075250 170174 177700 LOFPS 98-100(R4) 3@TEST INSTRUCTION 
15249 075254 170271 000072 STFPS #e72(R1) s*TEST INSTRUCTION 
15250 075260 020427 003262 CMP R4, OTSTLOC +100 ;VERIFY Ra 
15251 075264 001401 BEG 1% sBRANCH IF GOOD 
aoe 075266 1040035 ERROR +3 3FPP ERROR 
1 Fy 
15254 075270 020127 003072 18: Cer R1,@TSTLOC-70 sVERIFY R1 
15255 075274 001401 BEQ 2s ;BRANCH IF GOOD 
15256 075276 1040035 ERROR +3 ;FPP ERROR 
15257 3BAD R1 
15258 075300 023727 003172 145501 2%: CMP @eTSTLOC +10, 0145501 ;VERIFY STATUS 
15259 075306 001406 EQ 3% ;BRANCH F GOOD 
15260 075310 1040035 ERROR +3 3;FPP ERROR 
15261 3B8AD STATUS\ 
15262 075312 000167 000006 JP 3% sGET OVER TRAP 
15263 sUNEXPECTED TRAP 
15264 075316 012600 108: MOV (SP)+,RO ;SAVE PC 
15265 075320 012605 MOV (SP )+,RS ;SAVE PS 
15266 075322 104003 ERROR +3 3;FPP ERROR 
15267 ;UNEXPECTED TRAP 
15268 075324 as 
15269 
15270 
15273 3 
15274 F 
be 
15276 ;TEST LDOCLD MODE 27 
15277 3 
15278 PF 
15279 3 
15260 F 
15261 075324 MLOC2 ; 
15262 
15263 3 
15264 075324 005001 CLR R1 ;INIT R1 
5265 075326 012704 007700 MOV #7700 ,R4 ;FPS*DOUBLE, LONG 
15266 075332 170104 LOFPS Ré 3 
15267 075334 012737 075370 000244 MOV 0108 , BOF PVEC ;SETUP WILD TRAP 
15268 0 177027 LOCLD (R7)+,ACO s¢TEST INSTRUCTION 
15269 075344 005201 INC Ri 3 
15290 075346 005201 Inc R1 3 
15291 075350 005201 INC R1 3 
15292 075352 005201 INC 3 
15293 075354 020127 0000035 CMP R1, 03 ; VERIFY 
15294 075360 001406 BEQ 1$ ;@RANCH IF GOOD 
15295 075362 104005 ERROR +3 3;FPP ERROR 
15296 s INSTRUCTION FAILED 
15297 075364 000167 000006 JP 18 ; JUMP OVER WILD TRAP 
15296 075370 012600 108: MOV (SP )+,RO ;SAVE PC 
15299 075372 012605 MOV (SP)+,RS ;SAVE PS 
15300 075374 1040035 ERROR +3 3sFPP ERROR 
15301 sWILD TRAP ON INSTRUCTION 
15302 075376 012704 003324 18: MOV @TABEA ,R4 sPOINT TO EXPECTED DATA 
15303 075402 012701 003142 MOV @RECDST,R1 sPOINT TO DATA BUFFER 
15304 075406 174011 sTO ACO,CR1) ;VERIFY DATA 
| 
i 


15305 075410 


TESTS 


004767 
005767 
001401 
104003 


040000 
105500 


000460 
177777 
000000 


2s: 


MLCF: 


3 
31/INT=0 


555" 


32/INT=0, - 


. 
~ 


555s" 


33/LONG=0 


g 


;4/INT=40000 


35/LONG= 


rT 


36/INT=PA 


4 
~ 
m 


g5555° 


3 7/INT#- 


NS 
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R7,DATVER 
COUNT 

2s 

+3 


;BRANCH IF GOOD DATA 


3;FPP ERROR 
;BAD DATA 


300 
3FSRC 
sRESULT 
; TEST FPS 
sRESULT FPS 


3:00 
sF SRC 
sRESULT 
; TEST FPS 
sRESULT FPS 

:00 
3:F SRC 
sRESULT 
; TEST FPS 
sRESULT FPS 

300 
3sFSRC 
sRESULT 
; TEST FPS 
sRESULT FPS 

:00 
3F SRC 
;RESULT 


3; TEST FPS 
sRESULT FPS 


300 
3F SRC 
sRESULT 
; TEST FPS 
;RESULT FPS 


TEST 


TEST 


TEST 


TEST 


TEST 


TEST 





15420 076014 


TESTS 


000340 
000000 
000000 
000320 
000000 
000000 
000300 
126000 
000260 
000000 
000000 
000240 
000001 
000000 
000220 
000252 
000000 
000200 
000000 
000000 


000160 
177777 
000000 


000140 
125252 
1252553 
000120 


177500 
177777 


B6é 
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JSR R7, + Ay y 
.WORD  -40000,0 
. WORD en 0 
. WORD 
. WORD io 
:6/INT*-1 
JSR R7 LCF SUB 
. WORD - 0 
-WORD 140200,0 
-WORD 7 
.WORD 10 
19/INT=PATTERN 
JSR R7 ,LCFSUB 
-WORD 125252.125252 
-WORD 143652, 126000 
-WORD 7 
-WORD 10 
3 10/LONG*40000 
JSR R7 ,LCF SUB 
-WORD 40000,0 
-WORD 47600,0 
-WORD 117 
-WORD 100 
+11/LONG*1 
JSR R7, LCFSUB 
-WORD 0,1 
-WORD 40200,0 
-WORD 7557 
-WORD 7540 
312/LONG@PATTERN 
JSR R7 LCF SUB 
. WORD 252 
-WORD 42052.0 
-WORD 7557 
-WORD 7540 
3135/LONG = -40000 
JSR R7 ,.LCFSUB 
. WORD = a 
-WORD 147600,0 
-WORD 107 
-WORD 110 
314/LONG=-1 
JSR R7 LCF SUB 
. WORD -1,-1 
. WORD 0 
. WORD 
-WORD 7510 
3 15/LONG=PAT TERN 
JSR R7 LCF SUB 
-WORD 125252.125252 
-WORD 147652,125255 
-WORD 105 
-WORD 110 
316/LONG*77777,177500 
JSR LCF SUB 
.WORD 77777,177500 
WORD = 47777,177777 


100 
sF SRC 


Test 


sRESULT 


3s TEST FPS 
sRESULT FPS 


300 
sF SRC 


sRE 
s TEST FPS 
sRESULT FPS 


TEST 


SULT 


RESULT 
3; TEST FPS 


sRESULT FPS 


3:00 
sF SRC 


sRESULT 
3; TEST FPS 
sRESULT FPS 


300 
sF SRC 


sRESULT 

3s TEST FPS 

sRESULT FPS 
300 


: TEST FPS 


3 TEST FPS 
sRESULT FPS 


300 
sF SRC 


a 
3s TEST FPS 
sRESULT FPS 


TEST 


TEST 


TEST 


TEST 


RESULT 


sRESULT 
3 TEST FPS 
F 


SEQ 02735 
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FLOATING POINT TESTS 
15421 076020 000117 -WORD 117 3 TEST FPS 
15422 076022 000100 -WORD 100 sRESULT FPS 
3 317/LONG*40000 , 100 
15424 076024 004767 000100 JSR R7 LCF SUB 300 TEST 
15425 076030 040000 000100 -WORD 40000,100 sF SRC 
15426 076034 047600 000001 .WORD 47600,1 sRESULT 
15427 076040 007502 . WORD 3s TEST FPS 
15426 076042 007500 . WORD sRESULT FPS 
318/LONG*40000,100 - TRUNCATE 
15430 076044 004767 000060 JSR R7 LCF SUB 300 TEST 
15431 076050 000100 -WORD 40000,100 3F SRC 
15432 0 7600 000000 -WORD 47600,0 sRESULT 
15433 076060 007557 -WORD 7557 3 TEST FPS 
15434 076062 007540 -WORD 7540 sRESULT FPS 
15435 319/INT= MOST NEGATIVE 
15436 0 004767 000040 JSR R7 . LCFSUB 300 TEST 
15437 076070 100000 000000 -WORD 100000,.0 aF 
15438 076074 144000 000000 -WORD 144000,0 i RE T 
15439 076100 000007 WORD 267 3 TEST FPS 
15440 076102 000010 . WORD sRESULT FPS 
1 320/LONG= MOST ee 
1 076104 004767 000020 JSR R7 .LCFSUB 300 TEST 
15443 076110 100000 000000 -WORD 1 0 3F SRC 
15444 076114 150000 000000 WORD 1 0 sRESULT 
15445 076120 000107 -WORD 107 : TEST FPS 
15446 076122 000110 -WORD 110 sRESULT FPS 
15447 5 
15448 
ened 076124 000167 000112 JP HOP 18 sGET OVER SUBROUTINE 
8 
15451 F 
15452 3 OXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXex 
15453 3 OXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXex 
15454 sLOCIF, L 
15455 3 
15456 3 FSRC 
15457 3 RESULT 
154568 3 FPS BEFORE EXECUTION 
15459 8 FPS AFTER EXECUTION 
15460 3 F 
15461 sNO TRAP CAN OCCUR ie 
15462 s oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
eat j oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXex 
5464 3 
15465 076130 012602 LCFSUB: MOV (SP )-,R2 3 RETURN ADORESS TO USE AS POINTER 
15466 076132 012737 076230 000244 MOV 050%, sREDIRECT TRAP VECTOR 
15467 076140 012701 003142 MOV @RECDST, R1 sPOINT TO RESULT AREA 
15468 076144 016200 000010 MOV 10(R2), RO 3GET TEST f 
15469 076150 170100 LOFPS RO sLOAD TEST FPS 
Shy 076152 010204 MOV R2,R4 sPOINT TO TEST DATA 
3 
pe 076154 177014 — LOCIF (R4),ACO s@TEST INSTRUCTION (ACCORDING TO MODE) 
15474 VERIFY STATS 
15475 076156 170205 2s; STFPS RS sSAVE FPS 
15476 076160 012700 000200 MOV #200 ,RO 3SET FPP STATUS TO DOUBLE 


15477 076164 170100 LOFPS RO ‘ 


‘eo 
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SEQ 0275 


154786 076166 174011 sto ACO,(R1) +SAVE TEST RESULT INTO RECDST 
15479 076170 016200 000012 MOV 12(R2),RO sGET EXPECTED STATUS 
15480 076174 020003 CMP »R3 sVERIFY STATUS 
15481 076176 001401 BEQ 3% sBRANCH IF GOOD 
1 0 104003 ERROR +3 ap — 
1 3 
15484 076202 010204 38: MOV R2,R4 sPOINT TO EXPECTED DATA 

t) 062704 000004 ADD 64 ba 
15486 076210 004767 037162 4$: JSR R7 ,.DATVFR sVERIFY DATA 
15487 076214 005767 104700 TST T 
15488 0 001401 BEQ 53% sBRANCH IF GOOD 
15489 076222 104003 +3 Aad ee 

’ 
15491 076224 000162 000014 S$: JP 14(R2) sRETURN FROM TEST 
1 3 
1 s INSTRUCTION TRAPPED 
15494 076230 012600 So?: MOV (SP)+,RO sSAVE PC 
15495 076232 0.22605 MOV (SP )+,RS sSAVE PS 
15496 076234 1040035 ERROR +3 3;FPP ERROR 
s INSTRUCTION WASNT SUPPOSE TO TRAP 

15496 076236 000167 177762 JP 53 s CONTINUE 
15499 076242 Hor 18 
15500 
15503 3 
15504 3 
15505 Porc cccccccccc coc cccccooccocccocce 
15506 sTEST LOCIO, LOCLO 
15507 3 
15508 3 
15509 ; 
15510 3 
15511 076242 MLCD: 
15512 
15513 
15514 31/LONG=0 
15515 076242 004767 000264 JSR R7,LCOSUB 300 TEST 
15516 076246 000000 000000 . WORD 0 sF SRC 
15517 076252 O00000C 000000 -WORD 0,0,0,0 sRESULT 

07 000000 
15516 076262 0073135 -WORD 7313 3 TEST FPS 
15519 076264 7 -d0ORD 7304 sPESULT FPS 
15 s2/INT*0 
15521 076266 004767 000240 JSR R7,LCOSUB 300 TEST 
15522 076272 000000 000001 -WORD 0,1 3F SRC 
15523 076276 040200 000000 -WORD 40200,0,0,0 sRESULT 

076 000000 
15524 076306 007757 -WORD 7757 3s TEST FPS 
15525 076310 007740 .WORD 7740 sRESULT FPS 
15526 3 3/INT #40000 
15527 076312 004767 14 JSR R7, LCOSUB 3:00 TEST 
15526 076316 177777 -WORD 40000,-1 sF SRC 
15529 dng 4 043600 -WORD 43600,0,0,0 sRESULT 
15530 076332 007617 .WORD 7617 3s TEST FPS 
15531 076334 007600 -WORD 7 sRESULT FPS 
15532 34/INT= -40000 
15533 076336 004767 000170 JSR R? ,LCOSUB 300 TEST 
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FLOATING POINT TESTS 
15534 076342 140000 177777 
15535 076346 143600 000000 
076354 000000 
15536 076356 007600 
15537 076360 007610 
S538 


076412 000001 
15547 076416 040200 000000 
076424 000000 
076426 000300 
15549 076430 000300 
15551 076432 ? 74 


000050 
123456 1765435 
122600 


35/LONG= 


* 


16/LONG*1 


"5 BBP 55 58 


37/LONG- 


a5 as" 


:8/INT=PAT 


55 55" 


19/LONG=PATTERN 


: 
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-40000, -1 sF SRC 
143600,0,0,0 sRESULT 
7600 3s TEST FPS 

7610 sRESULT FPS 
R7,LCOSUB 300 TEST 
40000 ,0 sF SRC 

47600,0,0,0 sRESULT 

7757 s TEST FPS 

7740 sRESULT FPS 

R7, LCOSUB 300 TEST 

0,1 sF SRC 

40200,0,0,0 sRESULT 

300 :; TEST FPS 

300 sRESULT FPS 
R7,LCOSUB 300 TEST 
-1,-2 sF SRC 

140400,0,0.0 sRESULT 
7300 3: TEST FPS 

7310 sRESULT FPS 

R7 ,LCOSUB 300 TEST 
123456, 176543 sF SRC 
143661, 122000,0,0 sRESULT 
200 s TEST SPS 

210 sRESULT FPS 

R7 ,LCOSUB 3:00 TEST 
125252 ,125252 ’ 

147652 , 125252 , 126000,0 sRESULT 
300 3; TEST FPS 

310 sRESULT FPS 

HOP 19 sGET OVER SUBROUTINE 


3 
3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 


sLOCIO, LOCLD 
’ 


FSRC 

RESULT 

FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 


i 

sNO TRAP CAN OCCUR 

3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaeXeXeXeXeXeXeXeXeXeXeXeXexX 
3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 





15592 
15593 076556 


TESTS 


076632 000244 
003142 
000014 


177762 


003030 
001140 
067012 025252 


067012 025252 


LCDOSUB: MOV (SP)+,R2 
MOV #503, 
MOV @RECOST, 
MOV 14(R2),RO 
LOFPS RO 
MOV R2,R4 

3 

40% LOCID (R4),ACO 

;VERIFY STATUS 

2s: STFPS R3 
MOV #200 ..RO 
LOFPS RO 
STO AcO,CR1) 

16(R2),RO 
CMP RO,RS 
BEQ 3% 
3 

3%: MOV R2,R4 
ADO #4 RA 

4%: JSR R7,DATVER 
TST T 
BEQ 5% 
ERROR 3 

5%: Jp 20(R2) 

} INSTRUCTION TRAPPED 

50s: MOV (SP)+,RO 
MOV (SP)+,R5 
ERROR 3 
JP 5$ 

3 

HOP 19: 

PF 

3 

iTEST LDEXP 

sD0UBLE 

F 
F 
r 

MLXP; 


}1/EXP #10 - AC=NEG 
CLR re 
JSR 


F6 
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10 3EXP 
142056 ,67012,25252,171717 


SEQ 0277 


RETURN ADDRESS ron USE AS POINTER 


sPOINT i TEST DATA 

s*TEST INSTRUCTION (ACCORDING TO MODE) 
sSAVE FPS 

3SET FPP STATUS TO DOUBLE 

’ 

sSAVE TEST RESULT INTO RECDST 


sGET EXPECTED STATUS 
sVERIFY STATUS 
ANCH IF GOOD 


sPOINT TO EXPECTED DATA 


sVERIFY DATA 


sRETURN FROM TEST 


sSAVE PC 
sSAVE PS 


3FPP ERROR 
sINSTRUCTION WASNT SUPPOSE TO TRAP 


3s CONTINUE 


sNO —w 


XPSUB 100 TES 
. WORD izdase, 67012,25252, 171717 sACO 


sRESULT 
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15660 076774 


15672 077044 
077052 


15673 077054 
15674 077056 
077064 


15675 077066 
15676 077070 
5677 


1 
15676 077072 
15679 077100 


15682 077116 
7124 


15685 077132 
5686 


1 
15687 077134 
15686 077142 


TESTS 
171717 
007757 
007750 


003030 
001102 
070123 


070123 


003030 
001006 
177777 


177777 


003030 
000750 
177777 


177777 
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-WORD 7757 s TEST FPS 
— 7750 sRESULT FPS 
32/EXP*177 - ACO=POS 
CLR OOFL sNO INTERRUPTS 
JSR R7 ,LXPSUB 300 TEST 
100000 -WORD 23456, 70123,100000,1 sACO 
-WORD 177 EXP 
100000 -WORD 77656, 70123,100000,1 sRESULT 
-WORD 7700 3s TEST FPS 
-WORD 7700 sRESULT FPS 
13/EXP=56 
CLR BAFLAG sNO INTERRUPTS 
JSR R7, LXPSUB 300 TEST 
033333 -WORD 55555, 44444 , 33333 ,22222 3ACO 
-WORD S56 3EXP 
033333 WORD 53555, 44444 ,33333,22222 ;RESUT 
.WORD 7757 3 TEST FPS 
.WORD 7740 sRESULT FPS 
:4/EXP*-151, ACO=UV 
CLR BOF LAG sNO INTERRUPTS 
JSR R7,LXPSUB 300 TEST 
177777 . WORD 100077, -1,-1.-2 3ACO 
-WORD -155 3EXP 
177777 . WORD 104677,-1.,-1.-2 sRESULT 
.WORD 7757 s TEST FPS 
-WORD 7750 sRESULT FPS 
35/EXP=-177 
CLR @4F LAG sNO INTERRUPTS 
JSR R7,.LXPSUB 300 TEST 
177777 . WORD 177,-1,-1.-2 3ACO 
. WORD -177 3EXP 
177777 -WORD 377,-1,-1.-2 sRESULT 
-WORD 7700 3s TEST FPS 
-WORD 7700 sRESULT FPS 
36/EXP=- 200, UNDERF LOW 
003030 MOV @1,@80F LAG : INTERRUPTS 
JSR R7, LXPSUB 300 TEST 
035363 -WORD 30131,32334,35363, 73031 ACO 
-WORD -200 EXP 
035363 -WORD 131,32334,35363, 73031 sRESULT 
.WORD 7740 s TEST FPS 
-WORD 107744 sRESUL® FPS 
WORD 12 sFEC 
37/EXP=LARGEST NEGATIVE 
003030 MOV @1,80FLAG 


JSR R7,LXPSUB 


sEXPECT INTERRUPTS 
300 TEST 


SEQ 0278 





15689 077146 

077154 
15690 077156 
15691 077160 

077166 
15692 077170 
15693 077172 
15694 077174 


15695 
15696 077176 


15701 077232 
15702 077234 
15703 077236 


15707 077252 
077260 
15708 077262 


15710 077274 
15711 077276 
15712 077300 
15713 

15714 077302 
15715 077310 
15716 yl a 


77322 
15717 077324 
157186 077326 
0773534 
15719 pth oe 
15720 0 
15721 ov 7342 
15722 
15723 077344 
) 77350 


15725 077354 
7362 


15728 077376 
15729 077400 
15730 

15731 077402 


15732 077406 
15733 thay 


077420 
15734 077422 


TESTS 


COKDACO KDJ11-8 CLUSTER DIAG. 
FLOATING POINT 


000123 


000123 


100000 


100000 


012346 


003036 
000440 
177777 


177777 
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000456 


000456 


065432 


065432 


177777 


177777 


.WORD 0,123,456,1 3ACO 
«WORD 100000 sEXP 
-WORD 40000,123,456,1 sRESULT 
«WORD 2200 s TEST FPS 
-WORD 102200 sRESULT FPS 
«WORD 12 sFEC 
38/EXP= -200, NEG. ACO 
MOV 01, BOF LAG s INTERRUPTS 
JSR R7 ,LXPSUB 300 TEST 
-WORD 111111,100000, 100000, -1 sACO 
«WORD -200 sEXP 
«WORD 100111,100000, 100000, -1 sRESULT 
-WORD 2217 s TEST FPS 
-WORD 102214 sRESULT FPS 
-WORD 12 sFEC 
19/EXP=-174 3, FIU*0 
MOV 02, BOF LAG sNO INTERRUPTS 
JSR R7,LXPSUB 3:00 TEST 
-WORD 123456,12346,12346,1235 sACO 
«WORD -1743 sEXP 
-WORD 0,0,0,0 sRESULT 
-WORD 5700 s TEST FPS 
-WORD 5704 sRESULT FPS 
«WORD 12 sFEC 
310/EXP =-16616, FID=1 
MOV 02, BOF LAG sNO INTERRUPTS 
JSR R7,LXPSUB 300 TEST 
-WORD 377,123456,65432,1 sACO 
-WORD -16616 sEXP 
-WORD 74577,123456,65432,1 sRESULT 
-WORD 47700 3 TEST FPS 
-WORD 147700 sRESULT FPS 
-WORD 12 sFEC 
11/€XP*177, ACO=UNDEF INED VARIABLE 
CLR BOF LAG sNO INTERRUPTS 
JSR R7,LXPSUB 300 TEST 
. WORD 100177, -1,-1,-1 3ACO 
-WORD 177 3EXP 
. WORD -1,-1,-1.-1 sRESULT 
-WORD 7700 : TEST FPS 
-WORD 7710 sRESULT FPS 
312/EXP> 150 ACO=POS 
CLR BOF LAG sNO INTERRUPT 
JSR R7,LXPSUB 300 TEST 
. WORD 200 . 100 o 200 . 300 Q ACO 
-WORD 150 EXP 
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FLOATING POINT 

15735 077424 

077432 

15736 077434 

15737 077436 
738 


is 
15739 077440 
15740 077446 
15741 077452 
077460 
15742 077462 
15743 077464 
077472 
15744 077474 
15745 077476 
15746 077500 
15747 
15748 077502 
15749 077510 
15750 077514 
77522 


15771 077642 
15772 077644 
15773 
15774 077646 
15775 077652 
15776 077656 
077664 
15777 077666 
15776 077670 
077676 
15779 077700 
15780 077702 


TESTS 


000100 


000001 
000342 
177777 


177777 


000002 
000300 
177777 


177777 


000236 
177777 
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003030 
177777 


177777 


003030 
177776 


177776 


003030 
177776 


000555 


000555 


-WORD 72000,100,200,300 sRESULT 
-WORD 7717 3; TEST FPS 
-WORD 7700 sRESULT FPS 
113/EXP=200, ACO=NEG 
MOV 01, 80F LAG 
JSR R7 ,LXPSUB 300 TEST 
. WORD -1,-1,-1,-1 7 0 
«WORD 200 sEXP 
«WORD 100177,-1,-1,-1 sRESULT 
-WORD 7705 ; TEST FPS 
«WORD 107716 sRESULT FPS 
-WORD 10 sFEC 
314/ExXP=400, FID 
MOV @2 , BOF LAG s INTERRUPT 
JSR R7 , LXPSUB 300 TEST 
. WORD 555,-1.-2.-3 sACO 
-WORD 400 EXP 
. WORD 40155,-1,-2,-3 sRESULT 
-WORD 47700 s TEST FPS 
-WORD 147702 sRESULT FPS 
. WORD sFEC 
315/EXP*11011 FIU=*0 
MOV 00, GOFLAG sNO INTERRUPT 
JSR R7 ,LXPSUB 300 TEST 
. WORD 177773,-1.-2.-3 3ACO 
-WORD 11011 sEXP 
. WORD 0,0,0,0 sRESULT 
-WORD 6700 3s TEST FPS 
-WORD 6706 sRESULT FPS 
316/EXP°LARGEST POSITIVE 
MOV @1,80F LAG s INTERRUPT 
JSR R7 ,LXPSUB 3:00 TEST 
-WORD 123456,100,100,200 ACO 
-WORD 77777 sEXP 
-WORD 137656,100,100, 200 »RESULT 
-WORD 7740 3s TEST FPS 
«WORD 107752 sRESULT FPS 
-WORD 10 sFEC 
317/FLOATING 
CLR BOFLAG sNO INTERRUPT 
JSR R7 ,LXPSUB 300 TEST 
-WORD 123456,23465,555, 444 3ACO 
-WORD 50 3EXP 
-WORD 152056,23465,555,444 sRESULT 
-WORD 7500 : TEST FPS 
-WORD 7510 sRESULT FPS 


J6 
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1578 316/FLOATING UNDERFLOW 
15782 077704 012737 000001 MOV 61,80FLAG 3 INTERRUPT 
15783 077712 004767 000076 JSR R7, LXPSUB 300 TEST 
15764 eyTTes 000333 000444 000555 . WORD 333,444,555 ,666 3ACO 
0 
15785 077726 177600 . WORD -200 3EXP 
15786 pL a 000133 000444 000555 . WORD 133, 444,555,666 sRESULT 
15787 077740 007500 . WORD 7500 3; TEST FPS 
15788 077742 107504 . WORD 107504 sRESULT FPS 
15789 077744 000012 . WORD le 3FEC 
15790 319/FLOATING OVERFLOW 
15791 077746 012737 000001 003030 MOV @1,80F LAG 3; INTERRUPT 
15792 077754 004767 000034 JSR R7 , LXPSUB 300 TEST 
15793 077760 012346 000123 000345 . WORD 12346, 123,345,456 3ATO 
077766 0004 
15794 077770 . WORD 400 3EXP 
15795 077772 040146 000123 000345 . WORD 40146,123, 345,456 sRESULT 
100000 000456 
15796 100002 007400 . WORD 7400 3 TEST FPS 
| 15797 100004 107402 . WORD 107402 sRESULT FPS 
15796 100006 000010 . WORD 10 3FEC 
15799 3 
15800 
15801 100010 000167 000220 T OVER SUBROUTINE 
15802 3 suhathnttesctbedbettabiatsenatetetetedetetetetialeletiensmenener tan 
15803 3 @XeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
15804 sLDEXP 
158605 3 ACO 
15806 H EXPONENT 
15807 3 RESULT 
15606 3 FPS ORE EXECUTION 
158609 3 FPS AFTER EXECUTION 
15810 3 CFEC 
15611 3 
15612 3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
tat 3 XeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaXeXeXeXeXeXeXeXeXeX 
3 
15615 100014 0 LXPSUB: MOV (SP)+,R2 3 RETURN ADORESS TO USE AS POINTER 
15816 100016 012737 100100 000244 MOV 050% , BOF PVEC sREDIRECT TRAP VECTOR 
15817 100024 012701 003142 MOV T,R1 sPOINT TO RESULT AREA 
158616 100030 012700 MOV e iSET FPS TO DOUBLE 
| 15619 100034 170100 LOFPS 
15820 100036 010204 MOV R4 ;POINT TO ACO DATA 
158621 100040 172414 LOO (R4),ACO 
1 100042 00622 MOV 22(R2),RO 3;GET TEST FPS 
158623 100046 170100 LOFPS RO sLOAD TEST FPS 
fo 100050 01 000010 MOV 10(R2),R4 sPOINT TO TEST DATA 
5825 3 
| 15626 100054 176404 40%: LOEXP R4,ACO s*TEST INSTRUCTION ——— TO MODE) 
15627 100056 170327 1%: STST CPC)« sWAIT FOR POSSIBLE FPA 
| 158628 100060 . WORD 0 sSTORE STATUS HERE 
15829 ; 
| 15830 
| 158631 LINSTRUCTION DIONT TRAP 
15832 100062 032737 000001 003030 BIT #1,80FLAG ;VERIFY A NO TRAP CONDITION 
| 15833 100070 001420 BEQ tsi? :BRANCH IF GOOD 
| 
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TESTS 


ae Rae 
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000032 


003030 


ERROR +3 sFPP ERROR 
s INSTRUCTION SHOULD HAVE TRAPPED 
Jp es sREJOIN CODE 
F 
s INSTRUCTION TRAPPED 
50s: BIT #1, 80FLAG 3;SEE IF EXPECTING A TRAP 
BNE Sis sBRANCH IF EXPECTING A TRAP 
ERROR +3 3FPP ERROR 
sINSTRUCTION WASNT SUPPOSE TO TRAP 
JP $ sREJOIN C 
51%: MOV (SP)+,R4 sSEE IF PC = INSTRUCTION 
TST (SP )+ sCLEAN UP STACK 
CMP #1%,R4 F 
BEQ et s;BRANCH IF GOOD COMPARE 
3 3FPP 
sPC WAS INCORRECT 
F 
3sCOMMON CODE FOR TRAP AND NO TRAP 
;VERIFY STATUS 
2s: STFPS R3 sSAVE FPS 
MOV #200 ,RO 3;SETUP FPS 
LOFPS RO 3FPS=200 
STO aco, (R1) sGET RESULT 
MOV 24(R2),RO 3GET EXPECTED STATUS 
CMP oR3 ;VERIFY STATUS 
BEQ $ sBRANCH IF GOOD 
ERROR +3 3FPP ERROR 
3BAD FPS 
3%: MOV R2,R4 sPOINT TO EXPECTED DATA 
ADO #12,R4 
4$: — ea ;VERIFY DATA 
BEQ Ss sBRANCH IF GOOD 
ERROR 3 3FPP ERROR 
sBAD ACO 
5$: TST BOF LAG 3SEE IF NEED TO CHECK FEC 
BNE 7% sBRANCH IF NEED TO CHECK 
JP 26(R2) sRETURN FROM TEST 
;VERIFY FEC 
7%: @RECFEC .R4 sPOINT TO FEC AREA 
STST (R4) sSAVE FE 
CMP (R4),26(R2) ;VERIFY FEC FOR OVERFLOW 
BEQ 8S sBRANCH IF GOOD 
ERROR +3 3;FPP ERROR 
3;BAD FEC 
8s: Jp 30(R2) sRETURN FROM TEST 
F 
HOP 20 


sTEST STCOI, STCOL 


SEQ 0262 
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TESTS 


003030 
000610 
000000 


177777 
003030 


000560 
177777 
000000 


003030 
000500 
177777 


177777 


157737 


003030 


mSCOD: 


; 
31/ACO=0, INT 
R SOFLAG 


R7, SCOSUB 

-WORD 0177,0,0,0 3ACO 

-WORD O,-1 sRESULT 

.WORD 7640 3 TEST FPS 

.WORD 7644 sRESULT FPS 
32/ACO=-0, LONG 

CLR GPF LAG s INTERRUPT 

JSR R7, SCOSUB 300 TEST 

. WORD 100177,-1,-1,-1 3ACO 

-WORD 0,0 sRESULT 

.WORD 7700 3; TEST FPS 

.WORD 7704 sRESULT FPS 
33/EXP=100, LONG 

CLR LAG sNO INTERRUPT 

JSR R7, SCOSUB 300 TEST 

-WORD 20000,0,0,0 3ACO 

-WORD 0,0 sRESULT 

-WORD 300 3; TEST FPS 

-WORD 304 sRESULT FPS 
34/EXP=200, BAISED 0, INT 

CLR OOF LAG : INTERRUPT 

JSR R7, SCOSUB 300 TEST 

WORD 140177,177777,1,1 3ACO 

-WORD 0,0 sRESULT 

-WORD 7700 3; TEST FPS 

-WORD 7704 sRESULT FPS 
35/LONG 

CLR SOF LAG 3; INTERRUPT 

JSR R7, SCOSUB 3 TEST 

-WORD 47667,75757,157737,167773 :ACO 

-WORD 55675,173757 3RE 

-WORD 7717 : TEST FPS 

-WORD 77 sRESULT FPS 
36/LONG, EXP=2ee32 

Cu LAG 3sNO INTERRUPT 

JSR R7, SCOSUB 300 TEST 

-WORD 46400,0,0,0 3ACO 

-WORD 1000,0 sRESULT 

.WORD 7700 3; TEST FPS 

-WORD 7700 sRESULT FPS 
37/LONG, EXP>2ee32 

MOV @1,80FLAG s INTERRUPT 

JSR R7, SCOSUB 300 TEST 

. WORD 77607 ,0,0,0 3ACO 

-WORD 0,0 sRESULT 


~—L6 
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sNO INTERRUPTS 
00 TEST 
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TESTS 


177777 
000001 
000304 
177777 
177777 


177777 
163741 


000134 
177777 


003030 
000104 
177777 


000000 


MACRO M1200 18-OCT-84 16:38 PAGE 7-266 


SEQ 0264 
7700 s TEST FPS 
-WORD 107705 sRESULT FPS 
36/INT, ExXP=200e15 
CLR Sof L sNO INTERRUPTS 
JSR R7, 300 TEST 
000000 -WORD 43200,0,0.0 ;ACO 
-WORD 10000,-1 sRESULT 
-WORD 7600 ; TEST FPS 
-WORD 7600 sRESULT FPS 
39/INT, EXP>20015 
003030 MOV @1,B0F LAG s INTERRUPT 
JG a7, :00 TEST 
177777 . WORD 77777, -1.-1.-1 3ACO 
-WORD O,-1 sRESULT 
-WORD 7600 s TEST FPS 
-WORD 107605 sRESULT FPS 
310/INT, EXP>2e015, FID 
003030 MOV 00, BOF LAG sNO INTERRUPT 
: JSR R7, 300 TEST 
000000 -WORD 43300,0,.0,0 sACO 
-WORD 0,14000 sRESULT 
-WORD 47700 s TEST FPS 
-WORD 47700 sRESULT FPS 
s11/INT, ExXP>20e15, FIC*O0 
003030 MOV 00 , BOF LAG sWO INTERRUPT 
JSR R7, 300 TEST 
177777 . WORD 143300,-1.-1.,-i1 3ACO 
-WORD -1,165741 sRESULT 
-WORD 7300 ; TEST FPS 
-WORD 7310 RESULT FPS 
312/LONG, EXP>2ee32, FID 
003030 MOV @2 , BOF LAG s INTERRUPT 
JSR R7, SCOSUB 300 TEST 
000000 -WORD 50100,0,0,0 sACO 
-WORD 0,0 sRESULT 
-WORD 47700 ; TEST FPS 
-WORD 147705 sRESULT FPS 
:13/LONG, EXP>20032, FIC#0 
003030 MOV 00, BOF LAG 3;NO INTERRUPT 
JSR 7,SCO 300 TEST 
177777 . WORD $0377,-1,-1,-1 3ACO 
-WORD 0,0 ;RESULT 
-WORD 7300 ; TEST FPS 
-WORD 7305 sRESULT FPS 
314/LONG, EXP<0 
CLR BOF LAG ;NO INTERRUPTS 
JSR R7, SCOSUB 300 TEST 
177777 . WORD 100200, -1,-1,-1 ACO 
-WORD 0,0 ;RESULT 
-WORD 7757 ; TEST FPS 





FLOATING POINT 


16035 101116 


101120 
16038 101122 
16039 101124 


TESTS 


003030 
0029054 
177777 
177777 
003030 


177777 
177777 


000214 


000014 


000032 


177777 


177777 


003030 


-WORD 7744 

315/INT, EXP<0 
CLR BOF LAG 
JSR R7, SCOSUB 
WORD 37700,-1,-1.-2 
-WORD 0O,-1 
-WORD 7600 
-WORD 7604 

316/INT, EXP=10 
CLR BOF LAG 
JSR R7 , SCOSUB 
\WORD «= 4377, -1,-1,-1 
-WORD 0,-1 
-WORD 7600 
-WORD 7604 


N6 
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;RESULT FPS 


sNO INTERRUPTS 
300 TEST 
: 


sRESULT 
; TEST FPS 
sRESULT FPS 


sNO INTERRUPTS 
300 TEST 
;ACO 


sRESULT 
3; TEST FPS 
sRESULT FPS 


JP HOP21 sGET OVER INE 
3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
3 eXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 


sSTCDI, STCDL, STCFI, STCFI. 
; 


ACO 
RESULT 


oo ee te Ge Ge oe 


3 TRAP ON ION FAILURE 


FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
(FEC) 


3 @XeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
3 o@XeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXaeXeXeXeXeXeXeXeXeXex 


i 

SCOSUB: MOV CSP )+,R2 
MOV 050% , BOF PVEC 
MOV @RECDST+2,R1 
MOV #-1,(R1) 
MOV #-1,-CR1) 
MOV »RO 
LOFPS 
MOV oR4 
LOO CR4),ACO 
MOV 14(R2),RO 
LOFPS RO 

; 

40%: STCOI ACO,(R1) 

1s: STST (PC )- 
-WORD O 

; 

} INSTRUCTION DIONT TRAP 
BIT Sens 
ERROR +3 
JMp 2s 





3; RETURN ADDRESS TO USE AS POINTER 
sREDIRECT TRAP VECTOR 

sPOINT TO RESULT AREA 

‘Sens RECEIVE DATA BUFFER 


:SET FPS TO DOUBLE 
{POINT TO ACO DATA 
sLOAD ACO 


;GET TEST FPS 
3;LOAD TEST FPS 


s*TEST INSTRUCTIONCACCORDING TO MODE) 
sWAIT FOR POSSIBLE FPA TRAP. 
;STORE STATUS HERE. 


;VERIFY A NO TRAP CONDITION 
sBRANCH IF GOOD 
;FPP E 


RROR 
s INSTRUCTION SHOULD HAVE TRAPPED 
sREJOIN CODE 


B?7 
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FLOATING POINT TESTS 


101270 


101270 
101274 


LINSTRUCTION TRAPPED 
508: BIT 


032737 000001 003030 pat sSEE IF EXPECTING A TRAP 
001003 BNE 51% sQRANCH IF EXPECTING A TRAP 
104003 ERROR +3 sFPP ERROR 
sINSTRUCTION WASNT SUPPOSE TO TRAP 
000167 000014 2s sREJOIN 
012604 51%: MOV (SP )+,R4 sSEE IF PC = INSTRUCTION 
005726 TST (SP )- rCLEAN UP STACK 
022704 101122 chp 01% ,R4 
001401 BEQ $ IBRANCH IF GOOD COMPARE 
104003 3 3FPP 
sPC WAS INCORRECT 
sCOMMON CODE FOR TRAP AND NO TRAP 
iVERIFY STATUS 
170203 2s: STFPS RS sSAVE FPS 
016200 000016 MOV 16(R2),RO sGET EXPECTED STATUS 
020003 CMP RO,RS sVERIFY STATUS 
001401 BEO 3% sBRANCH IF GOOD 
104003 ERROR 3 3FPP ERROR 
3B8AD FPS 
010204 3%: MOV ¢ sPOINT TO EXPECTED DATA 
062704 000010 ADO 010,R4 
004767 034152 4$: JSR R7 .DATVFR sVERIFY DATA 
005767 101670 TST T 
001401 ea S$ sGRANCH IF GOOD 
104003 ERROR +3 Add 
3B8AD ACO 
005737 003030 S$: TST BAG 3SEE IF NEED TO oom FEC 
001002 BAL 78 sQRANCH IF NEEL TO CHECK 
000162 000020 JP 20(R2) }RE TURN FROM TEST 
; VERIFY FEC 
012704 003122 78: "OV @RECFEC .R4 »POINT TO FEC AREA 
170314 STST (R4) sSAVE F 
021427 000006 R4), 06 s VERIFY FEC FOR OVERFLOW 
001401 BEQ sBRANCH IF GOOD 
104003 ERROR +3 FPP ERROR 
3BAD FEC 
000162 000020 Bb: PP 20(R2) s;RETURN FROM TEST 
8 
HOP 21 
F 
F 
5 
3 --—"-s eee +e eee eee were rr rrr rr errr ree 
sTEST STCFI, STCFL 
3 
3 
3 
F 
MSCF : 
5 
31/LONG EXP =30 
005037 003030 CLR @OF LAG 3NO INTERRUPTS 
004767 177554 JSR R7,SCOSUB 300 TEST 


a ee _— - _ 


C7 
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SEQ 0287 
FLOATING POINT TESTS 
16107 101300 044541 052525 177777 -WORD 44541,52525,-1,-1 3ACO 
101306 177777 
16108 101310 102525 -WORD 3,102525 sRESULT 
16109 101314 007517 . WORD 17 3s TEST FPS 
16110 101316 . WORD sRESULT FPS 
16111 s2/INT, EXP<0 
16112 101320 005037 003050 CiR GOOF LAG sNO INTERRUPTS 
16113 101324 006767 177524 JSR R7, SCOSUB 300 TEST 
16114 101330 002 177777 «177777 .WORD 2300,-1,-1.,-1 3ACO 
101336 177777 
16115 101340 177777 -WORD 0O,-1 sRESULT 
16116 101344 007400 -WORD 7400 3s TEST FPS 
16117 101346 007404 .WORD 7404 sRESULT FPS 
16118 s3/L0ONG, EXP 
16119 101350 012737 000001 003050 MOV 01, 80FLAG s INTERRUPT 
16120 101386 006767 177472 JSR R7, SCOSLB 300 TEST 
16121 101362 070000 177777 177777 -WORD 70000,-1.-1.-1 3ACO 
101370 177777 
16122 101372 000000 000000 -WORD 0,0 sRESULT 
16123 101376 007540 . WORD 3 TEST FPS 
16124 101400 107545 . WORD 107545 sRESULT FPS 
16125 34/INT .ExPeS, FIC*0, FID91 
16126 101402 005037 0030350 Cu BF LAG 3NO INTERRUPTS 
16127 101406 004767 177442 ears R7, SCOSUB 300 TEST 
16126 101412 000000 177777 -WORD $2000.0,-1.-1 3ACO 
101420 177777 
16129 101422 177777 -WORD O,-1 sRESULT 
16130 101426 047000 .WORD 47000 3s TEST FPS 
16131 101430 047005 -WORD 47005 sRESULT FPS 
16132 3 
16133 
16134 
16137 3 
16138 3 
16139 Brrr renee en nce eee ee een een eee eeee 
16140 sTEST STEX? 
16141 3 
16142 
16143 
16144 
16145 101432 MSXP : 
16146 
16147 3 
16148 31/ExXP=100 
16149 101432 004767 000154 R7, SXPSUB 300 TEST 
16150 eas 000000 000000 ‘ 20000 .0,0,0 3ACO 
16151 101446 177700 . WORD -100 sRESULT 
101450 007740 WORD 7740 s TEST FPS 
16153 101452 007750 . WORD 7750 sRESULT FPS 
16154 32/EXP=201 FLOAT, NEG 
16155 101454 004767 000132 JSR R7, SXPSUB 300 TES? 
16156 101460 140377 177777 177777 . WORD 140377,-1,-1,0 3ACO 
101 000000 
16157 101470 000001 . WORD 1 sRESULT 
16158 101472 007500 . WORD 7500 3 TEST FPS 
16159 101474 007500 . WORD 7$800 sRESULT FPS 


D7 
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SEQ 0288 
FLOATING POINT TESTS 

16160 3 3/ExXPe-177 
16161 101476 0046767 000110 JSR R7 , SXPSUB 300 TEST 
16162 101502 000177 177777 177777 . WORD 177,-1,-1,-1 ACO 

101510 177777 
16163 101512 177600 . WORD 177600 sRESULT 
16164 101514 007700 “WORD 7700 s_TEST FPS 
16165 101516 007710 .WORD 7710 sRESULT FPS | 
16166 34/€xXP=-100 | 
16167 101520 004767 000066 JSR R7, SXPSUB 300 TEST 
16168 101524 020000 000000 177777 -WORD 20000,0,-1,-1 sACO 

101532 177777 
16169 101534 177700 . WORD -100 sRESULT 
16170 101536 040200 -WORD 40200 s TEST FPS 
16171 101540 040210 .WORD 40210 sRESULT FPS 
16172 35/EXP=200 
16173 101542 004767 000044 JSR R7,SXPSUB 300 TEST 
16174 101546 040000 000000 000000 -WORD 40000,0.0.0 3ACO 

101554 000000 
16175 101556 000000 -WORD O sRESULT 
16176 101560 007700 -WORD 7700 3s TEST FPS 
16177 101562 007704 .WORD 7704 sRESULT FPS 
16178 36/EXP=0 
16179 101564 004767 000022 ISR R7, SXPSUB 300 TEST 
16180 101570 OCO177 177777 177777 -WORD 177,-1.-1.-1 3ACO 

101576 177777 
16181 101600 177600 .WORD 177600 sRESULT 
16162 101602 -WORD O 3 TEST FPS 
16183 101604 000010 -WORD 10 sRESULT FPS 
16184 3 
16185 
16186 101606 000167 000104 JP HOP 22 sGET OVER SUBROUTINE 
16187 3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXex 
16188 3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
16189 sSTEXP 
16190 3 Aco 
16191 F EXPONENT RESULT 
16192 3 FPS BEFORE EXECUTION 
16193 3 FPS AFTER EXECUTION 
16194 
16195 3sNO TRAPS 
16196 3 oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 
taht g oXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeXeX 

5 
16199 101612 012602 SXPSUB: MOV (SP)+,R2 3 RETURN ADORESS TO USE AS POINTER 
16200 101614 012737 101704 000244 MOV 050% , BOF PVEC sREDIRECT TRAP VECTOR 
16201 101622 012701 003142 MOV @RECOST ,R1 sPOINT TO RESULT AREA 
16202 101626 012700 000200 MOV #200 ,RO 3SET FPS TO DOUBLE 
16203 101632 170100 LOFPS RO Fy 
16204 101634 010204 MOV R2,R4 sPOINT TO ACO DATA 
16205 101636 172414 LOO (R4),ACO 3L 0 
16206 101640 016200 000012 MOV 12(R2),RO 3GET TEST FPS 
eyed 101644 170100 LOFPS RO sLOAD TEST FPS 
6206 8 
o 101646 175011 40%: STEXP ACO,(R1) s@TEST INSTRUCTIONC ACCORDING TO MODE) 
$ 

16211 sVERIFY STATUS 


16212 101650 170203 26; STFPS RS sSAVE FPS 
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FLOATING POINT TESTS 


101652 016200 
020003 


101704 012600 
101706 012605 
101710 104003 


101712 000167 


101716 


101716 000004 


000014 


000010 


003142 


000016 


177762 


SEO 0289 
14(R2),RO 3GET EXPECTED STATUS 
RO,RS 
sBAD FPS 
3%: 10(R2),R4 sPOINT TO EXPECTED EXPONENT 
R4, BERECDST sVERIFY EXPONENT 
Q 5% sBRANCH IF GOOD 
ERROR +3 :FPP ERROR 
sBAD ACO 
S$: sap 16(R2) sRETURN FROM TEST 
: 
s INSTRUCTION TRAPPED 
50%: MOV (SP )+,RO sSAVE PC 
MOV (SP)+,RS sSAVE OLD PS 
ERROR +3 3FPP ERROR 
;WILD TRAP DURING STEXP 
aP S$ sREJOIN CODE 
F 
HOP 22: 


-ENABL AMA 

-SBTTL TEST - CHECK REGISTER ACCESS 

s CHECK REGISTER ACCESS - THIS TEST WILL VERIFY EACH OF THE THREE 
sCACHE MEMORY SYSTEM REGISTERS ~~. - ACCESSED WITHOUT A TRAP TO 
HLOCATION 4(NON-EXISTANT ADORESS TRAP) OCCURRING. THE REGISTERS TO 


3 CACHE CONTROL 17777746 
; MEMORY SYSTEM ERROR 17777744 
3 HIT/MISS 17777752 
sEACH REGISTER WILL BE ACCESSED WITH A WRITE CYCLE. 
3 
38GNTST 
3 SAVE OF LOCATION 4 


CONTENT 
SLET LOCATION 4 POINT TO ERROR ROUTINE 
sINITIALIZE R TO TOP OF ADDRESS TABLE 
300 UNTIL FOR ALL REGISTERS 


Os TEST REGISTER UNDER TEST 
tie IF TIMEOUT DID HAPPEN 

3. . ERROR 

Be ENDIF 

sENDOO 

SRESTORE CONTENTS OF LOCATION 4 
‘wa TST 

VADORESS TABLE: 17777746 

3 17777744 

3 17777752 


MOV 

CMP : s VERIFY gta 
BEQ a s8R 

ERROR +3 sFPP ERROR 

MOV 

chp 

BE 


sENDTST 
sERROR ROUTINE: SET TIMEOUT FLAG 
’ RETURN 


ff OSCSSSOSSSSSSSESSESSESESESSSEEESESESSEESESEESESEEDEEEEEEEEEESS 
TST2: sc 
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TEST - CHECK REGISTER ACCESS 


000240 
16272 101722 005737 003052 


T CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
erty 101726 001002 BNE 99% 3 NOT YET 
16274 
16275 101730 000240 NOP s DEBUG AID 
16276 101732 000453 BR TST3 33sGO TO NEXT TEST 
16277 101734 000240 99%: NOP 
16278 101736 012737 135056 000004 MOV @TOUT, 904 
16279 101744 013737 000004 003012 MOV oe, SLOCOO sSAVE CONTENTS OF VECTOR 4 
16260 101752 012737 102056 000004 . sLET VECTOR 4 tor TO ERROR ROUTINE 
16261 101760 005001 CLR Ri sCLEAR TIMEOUT FLAG 
16262 101762 005737 177746 18: TST CCR sREAD REGISTER UNDER TEST 
16263 101766 005701 TST R1 s TIMEOUT? 
16264 101770 001404 2 
16265 101772 012737 177746 001122 MOV @CCR , $BDADR sSTORE LOCATION 
16266 102000 104150 ERROR +130 s TIMEOUT ACCESING CCR 
16267 102002 005001 2s: CLR Ri sCLEAR TIMOUT FLAG 
16268 1 005737 177744 TST MSER sREAD MSER 
16269 102010 005701 TST R1 sTIMEOUT ? 
16290 102012 001404 BEQ 
16291 102014 012737 177744 001122 MOV @MSER , $BDADR sSTORE LOCATION 
16292 102022 104130 ERROR +130 s TIMEOUT ACCESSING MSER 
16293 102024 005001 38: CLR 1 sCLEAR TIMEOUT FLAG 
16294 102026 005737 177752 TST HITMIS sACCESS HIT/MISS 
16295 102032 005701 TST 1 3 TIMEOUT? 
16296 102034 001404 BEQ 
16297 102036 012737 177752 001122 MOV @HITMIS , $BDADR sSTORE LOCATION 
16296 102044 104150 ERROR +130 s TIMEOUT ACCESSING HIT/MISS 
16299 102046 013737 003012 000004 4%: MOV SLOCOO, a64 ;RESTORE VECTOR 
or 102054 000402 BR TsT3 33GO TO NEXT TEST 
16302 102056 ERROUT: 
16303 102056 005201 INC R1 sFLAG TIMEOUT 
16304 102060 000002 RTI 


ee ee ee ee ———- re ce ee eo ee ee - 


er, 
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Test 

16307 

16308 

16309 

16310 

16311 

16312 

16315 

16314 

16315 

16316 

16317 

163i8 

16319 

16320 

16321 

16322 

16323 

16324 

16325 

16326 

16327 

16328 
102062 

16329 102064 

16330 102066 

16331 102072 

16332 102074 

16333 102076 

16334 102100 

16335 102102 

16336 102106 

16337 102112 

16338 102 

16339 102124 

16340 1021350 

16341 102132 

16342 102136 

16343 102140 

16344 102144 

16345 102146 

16346 102150 

16347 102152 

16348 102154 

16349 


- CCR REGISTER BIT TEST 


003032 


001000 177520 


001000 177520 


-SBTTL TEST - CCR REGISTER BIT TEST 

icc REGISTER BIT TEST - THIS TEST WILL VERIFY THAT EACH READ/WRITE BIT OF 
THE CACHE CONTROL REGISTER CAN BE SET AND CLEARED INDIVIDUALLY AND THAT 

18ITS 15 - 11 AND BIT 6 ARE ALWAYS READ AS ZEROS. 


: 
sBGNTST 
J ity ly GOOD DATA TO #1 


Cu 
00 UNTIL ALL BITS TESTED 
3. WRITE = DATA TO CCR 


READ C 
a CCR NOT EQUAL TO GOOD DATA THEN 
IF CCR EQUAL TO ZERO THEN 
IF GOOD DATA NOT EQUAL TO BIT 15-11 OR BIT & THEN 
bow ERROR IN READ/WRITE BITS OF CCR 


ENDIF 
UPDATE TO NEXT BIT 


ENDOO 
sENDTST 


bE SESS ESSEAGHAALSHARHASEAKEEREEEHSSRMEHABASSAKEASASLSAKAHHEESERALE HEH 


ST3: —* 
TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
BNE 99% 3 NOT YET 
OP s DEBUG AID 
ise) TST4 33G0 TO NEXT TEST 
99%: wOP 
MOV #1, R1 sINITIALIZE GOOD DATA TO #1 
CLR CCR ;CLEAR CCR 
BIC #1000 ,BCSR sDISABLE HALT ON BREAK 
18: MOV Rl, CCR sWRITE GOOD DATA TO CCR 
CMP CCR, R1 sIF CCR NOT EQUAL GOOD DATA 
BEQ 3% 3 THEN 
TST CCR sIF CCR EQUAL TO ZERO 
BNE 3 THEN 
BIT #174400 ,R1 sIF GOOD DATA NE TO BIT 15-11 OR BIT 8 
BNE 3 THEN 
2s: ERROR +4 sERROR IN REPOARTTE BITS OF CCR 
3%: ROL R1 sUPDATE TO NEXT BIT 
6c 1s :PO UNTIL ALL BITS TESTED 
BIS #1000 ,BCSR sENABLE HALT ON BREAK 


H7 | 
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TEST - FORCE MISS TEST SEQ 0292 
16352 .SBTTL TEST - {Force MISS TEST 
16353 }FORCE MISS TEST - THIS TEST WILL VERIFY 
THAT ERENCES MADE 

16354 oy Hl EITHER BIT<3> OR BIT<2> OF THE CCR SET cause WP tae mass AND 
16355 LEAVE THE CACHE ENTRY UNCHANGED. FIRST WRITE A TEST ADORESS WITH 
16356 91S $12» CLEARED TO ALLOCATE CACHE AND SET A KNOWN DATA PATTERN 
eed oe OATA CACHE. THEN SET BIT<2> AND REWRITE THE SAME ADORESS yo 
16358 sNEM OA A sext CLEAR BITS<3:2> AND READ THE TEST ADORESS, THE DATA 
16359 te te O PATTERN 1. FINALLY READ THE TEST ADORESS WITH BIT<3> 
16360 set SHOULD EQUAL PATTERN 2. A LAST WRITE MUST BE DONE WITH 
16361 1BOTH FORCE BIT eIrs CLEARED BECAUSE THE CACHE AND MAIN MEMORY HAVE 
16363 : a 
16364 
ees WRITE TEST ADORESS WITH 

: PATTERN 
re Se ret tbat ult oar 2 

8 H PATTERN 
16369 sCLEAR CCR BIT<3> . 
6370 IREAD TEST ADORESS 
in Sod ecteee BRT 18 Parvem 
ehh sIF DATA NOT E THEN ‘ 
Beare _ IF DATA EQUAL TO PATTERN 2 THEN 
seats $e . IF HIT THEN 
ies? t- ; ee ERROR FORCE MISS WRITES TO CACHE 
6378 : . 
16876 “si . , IF PARITY ERROR INDICATORS EQUAL O THEN 
e360 - “Ga ERROR FROCE MISS INVALIDATES CACHE 
16361 - . . IF ALL PARITY INDICATORS SET THEN 
16382 : . : ERROR PARITY ABORT AFTER FORCE MISS 
16384 “- . ENDIF 
16385 “s Z “bien PORAUR T satT 
— ‘ AG PARITY ERROR AFTER F 
16306 , — ER FORCE MISS 
163s ‘- . IF BO AND B61 ERROR. THEN 

: . ERROR ARITY ERROR ORCE 
16389 + Lon ity € AFTER F MISS 
arty . IF BO PARITY ERROR THEN 
seene i. Q ERROR LOW BYTE PARITY ERROR 
16393 ‘ oor 
seuss . IF B1 PARITY ERROR THEN 
seuee , ; . ERROR HIGH BYTE PARITY ERROR 
163% 8. oe 7 ENDIF 
16397 “et - ENDIF 
16398 3. ‘ ENDIF 
16399 Sis ‘ ENDIF 
H Rs ELSE 
pease i. * ERROR IN DATA PATH 
be ENDIF 
16403 ENDIF 
: sSET CCR<3:2> = 1,0 
16406 READ TEST ADORESS 
16406 1SAVE MIT/HISS REGISTER DATA - 
16407 sIF DATA NOT EQUAL THEN _— 


16408 5. IF RECIEVED DATA EQUAL TO PATTERN 1 THEN 





17 
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SEQ 0293 
TEST - FORCE MISS TEST 

16409 F . IF HIT THEN 
16410 F . nos ERROR FORCE MISS READS FROM CACHE 
16411 3 . 
16412 3 ° . ERROR FORCE MISS READS FROM CACHE AND MISS 
16413 3 » ENDIF 
16414 ; ELSE 
16415 3 . ERROR IN DATA PATH 
16416 3 ENDIF 
16417 sENDIF 
16418 sCLEAR CCR<3:2 
16419 s‘RRITE TEST ADDRESS 
16420 VENDTST 
16421 3 
16422 $ § SSSSSSSSSSSSSSSSSSSSSSSSSESSSSESSSSSSSSSSSSSSESSSSSSSSSSESESSESES 

102162 000004 TST4: SCOPE 
16423 102164 000240 NOP 
16424 102166 005737 003032 TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
16425 102172 001002 BNE 99% 3: MOT YET 
16426 102174 woe ; OEBUG AID 
16427 102176 000563 BR TSsTS 3:GO TO NEXT TEST 
16426 102200 000240 99%: ROP 
16429 102202 013737 000114 003012 MOV 00114, SLOCOO sSAVE CONTENTS OF VECTOR 114 

102210 012737 000114 MOV _ OFPPARR , 80114 sSETUP PARITY VECTOR TO POINT TO HANDLER 
16431 102216 0050035 CLR R3 sCLEAR MSER SAVE LOCATION 

102220 7 003162 CLR SeTSTLOC sWRITE TEST LOCATION WITH PATTERN 1 
16433 102224 012737 177746 MOV #BITO2, CCR sSET CCR BITS<3:2> = 0.1 

102232 012737 177777 003162 MOV 0177777 , @@TSTLOC sWRITE TEST LOCATION WITH PATTERN 2 
16435 102240 012737 177746 MOV #200 sCLEAR CCR BIT 3 AND SET PARITY ABORTS 
16436 102246 012737 177777 001124 MOV #177777, $GDODAT sSAVE DATA IN MEMORY 
16437 102254 042737 001000 177520 BIC #1000 .,.8CSR sDISABLE HALT ON BREAK 
16438 102262 013701 003162 MOV @eTSTLOC Ri sREAD TEST ADDRESS 

013702 177752 MOV ° sSAVE MIT/MISS DATA 

16440 102272 052737 001000 177520 BIS #1000 .,.8BCSR sENABLE HALT ON BREAK 
16441 102300 005701 TST sCOMPARE RECEIVED DATA TO PATIERN 1 
16442 102302 001451 BEQ is iIF DATAS NOT EGU THEN 
16443 102304 022701 177777 CoP 0177777 ,R1 1IF GATA EQUAL TO PATTERN 2 
16444 102310 001045 106% F 
16445 102312 032702 000002 BIT @BITOi, R2 sIF HIT 
16446 102316 001402 BES 100% : THEN 
16447 102320 104005 ERROR +5 sFORCE MISS WRITES TO CACHE 
16446 102322 000441 1% sELSE 
16443 102324 932703 100340 100%: BIT #100340 RS sIF PARITY INDICATORS EQUAL O 
16450 102330 001002 BNE 101% : 
16451 102332 1 ERROR +6 sFORCE MISS WRITE INVALIDATES CACHE 
16452 102334 000434 BR 1% sELSE 
16453 102336 022703 100340 1018: Cop #100340 ,R3 :IF ALL PARITY INDICATORS SET 
16454 102342 001002 BNE 102% ; THEN 
16455 102344 104007 ERROR +7 ;PARITY ABORT AFTER FORCE MISS 
16456 102346 000427 BR is sELSE 
16457 102350 032703 000040 102%: BIT #BITOS, RS :IF TAG PARITY ERROR 
16456 102354 001402 BEQ 103% r 
16459 102356 104010 ERROR +10 ;TAG PARITY ERROR AFTER FORCE MISS 
16460 102360 000422 BR 18 2EL 
16461 102362 010304 103%: MOV Rs, :COPY MSER INTO REG 4 
16462 102364 042704 177477 BIC 0177477 ,R4 sMASK FOR BO AND 81 DATA 
16463 102370 022704 000300 CMP 300, :IF BO AND B81 DATA 
16464 102374 001002 BNE. 104% 3 THEN 





r--—-——-—-— - 
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TEST - 


FORCE MISS TEST 


102376 
1 


011637 
013703 
900002 


001 
177777 


000002 


177746 
177520 


177520 


000114 
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SEQ 0294 
ERROR ell sDATA PARITY ERROR AFTER FORCE MISS 
BR 1$ sELSE 
104%: BIT #100, R3 VIF BO ERROR 
BEQ 105$ 3 THEN 
ERROR «12 sLOW BYTE PARITY ERROR AFTER FORCE MISS 
105$: 24 + R3 :IF B1 ERROR 
3 
— + sHIGH BYTE PARITY ERROR AFTER FORCE MISS 
F 
106%: ERROR +14 sERROR DATA PATH 
1%: CLR R3 sCLEAR MSER SAVE REGISTER 
BIS #B8ITO3, CCR sSET CCR BITS <3:2> = 1,0 
BIC #1000 ,BCSR sDISABLE HALT ON BREAK 
MOV @PTSTLOC,R1 }READ TEST LOCATION 
MOV S@HITMIS ,R2 sSAVE MIT/MISS REGISTER DATA 
BIS #1000,8CSR sENABLE HALT ON BREAK 
CMP Ril, #177777 sCOMPARE RECEIVED DATA TO PATTERN 2 
BEQ 2s iIF DATAS NOT EQUAL THEN 
TST Ri sIF RECIEVED DATA EQUAL TO PATTERN 1 
BNE 108% 3 THEN 
BIT #BITO1, R2 sIF HIT 
BEQ 107% THEN 
= os sFORCE MISS READS FROM CACHE 
F 
107%: ERROR +16 sFORCE MISS READS FROM CACHE AND MISS 
BR Pzi sENOIF 
108%: ERROR +14 sERROR IN DATA PATH 
2s: MOV SLOCOO, 90114 }RESTORE VECTOR 114 
CLR CCR sCLEAR CCR BITS<3:2> 
CLR @eTSTLOC I WRITE TEST ADDRESS 
BR TSTS :3GO TO NEXT TEST 
FMPARR: MOV (SP), $BDADR sSAVE ADDRESS THAT CAUSED ABORT 
MOV MSER, R3 sSA¥VE CONTENTS OF MEMORY SYSTEM ERROR 
RTI sREGISTER AND RETURN 


-S8TTL TEST - HIT/MISS REGISTER TEST PART 1 

sHIT/MISS REGISTER TEST PART 1 - THIS TEST WILL VERIFY THAT THE HIT/MISS 
sREGISTER CORRECTLY LOGS HITS AND MISSES. A ae WRITE A TEST ADORESS WITH 
sB8ITS<3:2> CLEARED TO ALLOCATE CACHE AND SET 
3 THE THEN SET BIT<2> AND REWRITE THE Sane ADDRESS WITH NEW DATA. 
{NEXT CLEAR CCR BITS<3:2> AND READ THE TEST ADORESS, THE HIT/MISS REGISTER 
sSHOULD LOGGED A HIT. FINALLY READ THE TEST ADDRESS PLUS 20000(8) THE 

SHIT /MISS REGISTER SHOULD HAVE LOGGED A MISS. 

$ 


WRITE TEST ADDRESS WITH PATTERN 1 
iSET CCR jp tat * 0,1 
we T ADORESS wrth PATTERN 2 


S 
“of HIT/MISS REGISTER BIT 1 NOT SET THEN 
bs as RROR IN RECORDING HITS IN HIT/MISS 
Ly) 


IK 7 
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_ TEST - HIT/MISS REGISTER TEST PART 1 


16522 sREAD TEST ADDRESS + 20000(8) 
16523 :IF HIT/MISS REGISTER BIT 1 SET THEN 
16524 . ERROR IN RECORDING HITS IN HIT/MISS 
16525 sENDIF 
16526 sENDTST 
16527 3 
16528 EL SSSHHaHATECAHSEAKEHEASESEHRESAPBEHSAKSEKERREREAAEKEGHESSEE HARE REA H AS 

102546 000004 TSTS: SC 
16529 
16530 102550 000240 NOP 
16531 102552 005737 003032 TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
16532 102556 001002 BNE 99% 3; NOT YET 
16533 102560 NOP ; DEBUG AID 
16534 102562 0004635 BR TST6 3:GO TO NEXT TEST 
16535 102564 99%: WwOP 
16536 102566 013737 000114 003012 MOV 90114, SLOCOO sSAVE CONTENTS OF VECTOR 114 
16537 102574 012737 102724 000114 MOV SHRP ORR 89114 sSETUP PARITY VECTOR TO POINT TO HANDLER 
16538 102602 7 003162 CLR @eTSTLOC | WRITE TEST LOCATION ty PATTERN 1 
16539 012737 177746 MOV . CCR sSET CCR BITS<3:2> = 
16540 102614 012737 177777 003162 MOV 0177777 ,@@TSTLOC ;WRITE TEST LOCATION uit PATTERN 2 
16541 102622 012737 177746 MOV - CCR sCLEAR CCR BIT 35 a SET PARITY ABORTS 
16542 102630 737 001000 177520 BIC #1000 ,BCSR IOTSABLE HALT 
16543 102636 013701 003162 MOV @eTSTLOC R1 sREAD TEST ADORESS 
16544 102642 013737 177752 111464 MOV HITMIS ,RECDAT sSTORE REGISTER 
16545 102650 032737 111464 BIT _— RECDAT sIF HIT/MISS REGISTER BIT 1 NOT SET 
16546 102656 001001 BNE. 3 THEN 
16547 102660 104045 ERROR us sERROR IN RECORDING HITS IN HIT/MISS 
16548 102662 013701 023162 1%: MOV thie Be dg oR1 sREAD TEST LOCATION + 20000(8) 
16549 102666 013737 177752 111464 MOV HITMIS ,RECDAT sSTORE REGISTER 
16550 102674 032737 111464 BIT @8ITO2,RECDAT sIF HIT/MISS REGISTER BIT 1 SET 
16551 102702 001401 BEQ et 37 

704 ERROR +45 sERROR IN RECORDING HITS IN HIT/MISS 

16553 102706 013737 003012 000114 2% MOV SLOCOO, 80114 sRESTORE VECTOR 114 
16554 102714 052737 001000 177520 BIS #1000, sENABLE HALT ON BREAK 
oo 102722 000403 BR TST6 :3:GO TO NEXT TEST 
16557 102724 013703 177744 HMPARR: MOV MSER, R3 sSAVE CONTENTS OF MEMORY SYSTEM ERROR 
16558 102730 000002 RTI sREGISTER AND RETURN 


i a ee +e ee + + ee ——- -— + 


L7 
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| 
SEQ 0296 
TEST - HIT/MISS REGISTER TEST | 
16561 .SBTTL TEST - HIT/MISS REGISTER TEST | 
16562 sMIT/MISS REGISTER TEST - THIS TEST WILL VERIFY THAT THE HIT/MISS 
16563 sREGISTER CORRECTLY LOGS CACHE HITS AND MISSES. IT WILL ALSO VERIFY 
16564 ;THAT EACH BIT OF THE REGISTER IS UNIQUE. THIS WILL BE DONE BY 
16565 sFLOATING A — THROUGH A 4d. OF ONES. THE ROTATING WILL BE 
16566 3BY EXECUTING A TST OHM (WHERE HM IS THE ADORESS OF THE HIT/MISS 
16567 sREGISTER) AT SUCCESSIVE POSITIONS IN A SET OF EIGHT NOPS. THE READ 
16568 3;0F THE I/0 PAGE ADORESS OF THE HIT/MISS REGISTER SHOULD CAUSE A 
16549 sMISS TO BE RECORDED. 
16570 
16571 sB8GNTST 
16572 sINITIALIZE LOOP INDICATOR 
16573 sINITIALIZE EXPECTED DATA 
16574 300 UNTIL LOOP INDICATOR = SEVEN 
16575 Bie PuT DATA INTO EXECUTION BUFFER 
16576 . PuT yi Fa dag Yar INTO TEST LOCATION 
16577 Se Jp T XECUTE BUFFER 
16578 Ba ” EXPECTED DATA NE RECEIVED DATA THEN 
oe Ba ERROR IN RECORDING HITS IN HIT/MISS 
‘ . 
16581 be INCREMENT LOOP INDICATOR 
16582 S. UPDATE EXPECTED DATA 
16583 3sENDOO 
16584 3EXIT TST 
165865 3 
16586 3;BACKGROUND DATA:NOP 
16587 8 NOP 
165868 3 NOP 
16589 3 NOP 
16590 3 wOP 
16591 $ NOP 
16592 ; NOP 
16593 > NOP 
16594 3 MOV BOHM ,R2 
16595 3 RTS PC 
16596 sENDTST 
16597 ff SSSSSSSSSSSSSSESSESSSESSSSSSESESESSEEEEEEESEESEEEEESESEEEESESES 
102732 000004 TST6: OPE 
16596 102734 000240 nop 
16599 102736 005737 003032 TST CCHPAS sMAVE DONE ENOUGH INCLUSIVE PASSES? 
16600 102742 001002 ONE 99% 3 NOT YET 
16601 102744 000240 NOP ; DEBUG AID 
16602 102746 000511 BR TST7 33GG TO NEXT TEST 
16603 102750 99%: MOP 
16604 102752 005037 003154 CLR LOOPIN sINITIALIZE LOOP INDICATOR 
16605 102756 013737 023204 001162 MOV @OTSTLOC+20022, $TMP1 sSAVE FOR LATER 
16606 102764 012703 003164 MOV @TSTLOC+2,R3 3GET ADORESS OF EXECUTION BUFFER 
16607 102770 012704 103154 MOV @EXPTBL .R4 3sGET ADORESS OF EXPECTED DATA TABLE 
16606 102774 012705 177752 MOV @HITMIS RS sPUT ADORESS OF HIT/MISS REGISTER IN GPR 
16609 103000 042737 001000 177520 BIC #1000 ,8CSR ;OTSABLE HALT ON BREAK 
16610 103006 023727 003154 000007 1%: CMP LOOPIN, #7 300 UNTIL LOOP INDICATOR EQUALS 7 
16611 103014 001440 BEQ ERDART 3; THEN EXIT 
16612 103016 012702 000015 MOV 13, R2 
16613 103022 012700 103126 MOV @BACDA, ,RO sPUT BACKGROUND tee INTO 
16614 103026 012701 003162 MOV @TSTLOC,R1 VEXECUT ION BUFFER 
16615 103032 012021 2s: MOV CRO)>, CR1ID« 
16616 103034 077202 S08 R2, es ;LOOP FOR TEN WORDS 





M7 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 16-OCT-84 16:38 PAGE 10-1 


HIT/MISS REGISTER TEST 
103036 023727 003154 


103146 atte 111464 


103166 000075 
103170 000076 


000006 
023204 


177520 


3%: 
4$: 


5$: 


oe 
= ® 
w 


Pe 


~ 
z2 
~« 


sana * 


SEQ 0297 
LOOPIN, #6 sIS THIS LAST LOOP 
3% sIF YES THEN 
—————— ~~ FETCH OF “RECDAT“ 
’ 
@5737, (CR3)-+ sMOVE “TST” INSTRUCTION TO BUFFER 
@HITMIS CRS) sMOVE HIT.MISS REG. ADD. TO BUFFER 
PC. TSTLOC 3GO EXECUTE TEST CODE 
(R4), RECDAT sIF EXPECTED DATA NOT EQUAL TO 
sRECEIVED DATA THEN 
(R4), $GODAT sSAVE EXPECTED PATTERN 
o17 sERROR IN RECORDING HITS IN HIT/MISS 
(R4)+ s INCREMENT POINTER TO Sacre PATTERN 
oe S INCREMENT LOOP COUNTER 
#1000 ,BCSR sENABLE HALT ON BREAK 
TST7 3:GO TO NEXT TEST 
hace 
woP 
we 
WOOP 
woe 
NCP 
= 
(R5),RECDAT ;SAVE CONTENTS OF HIT/MISS REGISTER 
77 
37 
57 
67 
73 
75 
76 


N7 
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TEST - BYTE ALLOCATION TEST 


- SBTTL Taeat - BYTE ALLOCATION TEST 


sBYTE ALLOCATION TEST - THIS TEST WILL VERIFY THAT THE CACHE SYSTEM CORRECTLY 
’ TEST WILL FIRST CHECK THAT A WRITE 
:IS A MISS DOES NOT UPDA THIS BE DONE BY F 


; THE 

sWITH A PATTERN TO ALLOCATE THE ADDRESS. THEN A SECOND PATTERN WILL BE WRITTEN 

;TO THE HIGH BYTE OF THE TEST LOCATION. THE TEST LOCATION WILL THEN BE READ. 
:IF THE HIGH BYTE OF THE TEST LOCATION IS EQUAL TO THE SECOND PATTERN THEN THE 

:LOCATION WAS UPDATED. THE SECOND TEST WILL BE REPEATED TO TEST LOW BYTE 

aq 


; 

sBGNTST 

sSAVE VECTOR 114 

sLET VECTOR 114 POINT TO BYTE PARITY ROUTINE 
sSET PARITY ABORT BIT IN CACHE CONTROL REGISTER 


sIF MIT/MISS REGISTER BIT 1 SET THEN 
3. ERROR WRITE BYTE ALLOCATES THE CACHE 


sENDIF 
sWRITE PATTERN 1 TO TEST LOCATION 
s;WRITE BYTE PATTERN 2 TO TEST LOCATION+1 
;IF BIT: NOTSETIN HIT/MISS REGISTER THEN 
Be IF BO PARITY ERROR THEN 
ERROR LOW BYTE PARITY ERROR ON WRITE BYTE HIT 


. ELSE 

. , IF 81 PARITY ERROR THEN 

. ° ERROR HIGH BYTE PARITY ERROR ON WRITE BYTE HIT 
° . WRITE BYTE HIT DOES NOT RECORD A HIT 

. . ENDIF 

. ENDIF 

ELSE 


READ TEST LOCATION 
¥ RECIEVED DATA NOT EQUAL TO EXPECTED DATA THEN 
IF BYTE DATA REVERSED THEN 
ERROR BYTES REVERSED ON WRITE CYCLES 


ELSE 
° IF HIGH BYTE DATA ZERO THEN 

in os ERROR IN WRITING TO HIGH BYTE 
. ; ERROR IN WRITING TO HIGH BYTE 
. ENDIF 
ENDIF 


eNDIF 


sWRITE PATTERN 1 TO TEST LOCATION 

sWRITE BYTE PATTERN 2 TO TEST LOCATION LOW BYTE 
sIF BIT1 agp ght HIT/MISS REGISTER THEN 

i. IF BO PARITY ERROR THEN 


bs . 
$. ELSE 
Be ‘ 


ERROR LOW BYTE PARITY 
IF B61 PARITY ERROR THEN 
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TEST - BYTE ALLOCATION TEST 
16712 Be ‘ ERROR HIGH BYTE PRITY 
16713 $e ELSE 
16714 3. ° WRITE BYTE HIT DOES NOT RECORD A HIT 
16715 Be . ENDIF 
16716 Ss ENDIF 
16717 sELSE 
16716 Ss READ TEST LOCATION 
16719 ee IF RECIEVED DATA ~ EQUAL TO EXPECTED DATA THEN 
16720 3. IF BYTE DATA REVERSED THEN 
16721 is " YTES REVERSED 
16722 ws ELSE 
16723 3. ‘ IF LOW BYTE DATA ZERO THEN 
16724 Es ERROR IN DATA PATH 
16725 Bs ELSE 
16726 Se P ERROR IN DATA PATH 
16727 bs ‘ ENDIF 
16726 = . ENDIF 
16729 Be ENDIF 
16730 s ENDIF 
16731 sCLEAR CACHE yy REGISTER 
16732 IRESTORE VECTOR 1 
16733 sEXIT TST 
16734 3 
16735 s6YTE PARITY ROUTINE: SAVE MSER 
16736 3 RETURN 
16737 sENDTST 
16738 
16739 § J SOOHSSSSSSSSSSSSSSSSSSSSESESSSSSSSSSSSSOSSSSSESSSSSESSESEEEEEEEEE 
103172 000006 TST?: 
16740 103174 NOP 
16741 103176 005737 003032 TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
16742 1 001002 @e 99% 3 NOT YET 
16743 103206 wor 3; DEBUG AID 
16744 1 000517 6R TST10 33GO TO NEXT TEST 
16745 103210 998 wOoP 
16746 103212 013737 000114 003012 MOV 90114, SLOCOO sSAVE VECTOR 1 
16747 103220 012737 103434 000114 MOV @BYPARR , 80114 sLET VECTOR sia “POINT TO ABORT ROUTINE 
16748 103226 005003 CLR R3 sCLEAR MSER SAVE REGISTER 
16749 103230 012737 177746 mov @6IT07,. CCR 1SET PARITY ABORT BIT = CcR 
16750 103236 005737 023162 TST TSTLOC +8192. sREAD TEST LOCATION + 4K TO CAUSE MISS 
16751 103242 042737 001000 177520 BIC #1 ° sOISABLE HALT ON BREAK 
103250 105037 003162 TS sWRITE LOW BYTE OF TEST LOCATION 
16753 103254 1057357 3162 TSTB8 TS sREAD LOW BYTE OF TEST LOCATION 
16754 103260 013737 177752 111464 MOV TMIS ,RECDAT sSTORE REGISTER 
16755 103266 032737 OO00004 111464 BIT @81 102, RECDAT sIF BIT1 OF HIT/MISS REGISTER SET 
103274 001401 BEQ 18 , THEN 
16757 103276 1 ERROR ° sWRITE BYTE ALLOCATES CACHE 
16756 1 005037 003162 16: CLR TSTL sWRITE PATTERN 1 TO TEST LOCATION 
16759 103304 152737 000377 003165 BIS8 0377, BeTSTLOC+1 sWRITE PATTERN 2 TO HIGH BYTE 
16760 103312 013737 177752 111464 MOV HITMIS ,RECDAT sSTORE REGISTER 
16761 105. 032737 111464 BIT @81702.RECDAT sIF BIT1 NOTSETIN HIT/MISS REGISTER 
762 103 001002 OE 26 3 THEN 
16763 103330 104021 1018: ERROR e21 mire BYTE HIT DOES NOT RECORD HIT 
16764 103332 000405 Ss 36 
16765 103334 022737 177400 003162 2%: CoP 0177400 , B@TSTLOC iIF TEST ay fe NOT EQUAL TO 
16766 103342 001401 BEQ 36 sPATTERN 2 T 
16767 103344 104022 ERS oR 22 s8YTES MEGERSED ON WRITE CYCLES 


COKDACO KDJ11-8 CLUSTER DIAG. 
TEST - BYTE ALLOCATION TEST 


C8 


MACRO M1200 16-OCT-84 16:36 PAGE 11-2 


38: CLR TSTL 
003162 6IS8 0377,  ®@@TSTLOC 
111464 HITMIS ,RECDAT 
111464 BIT @BITO2 ,RECDAT 
BNE at 
ERROR +12 
003162 46: 0377, @@TSTLOC 
BEQ S$ 
ERROR +22 
S$: CLR CCR 
177520 BIS #1000, 
000114 MOV SLOCOO, 801 
BR TST10 
BYPARR: MOV (SP), sBDADR 
MOV » 


RTI 


sWRITE PATTERN 1 TO TEST — 
sWRITE PATTERN 2 TO LOW B 


sSTORE REGISTER 


+ 4 BIT1 NOTSETIN HIT/MISS REGISTER 


3 THEN 
sLOW BYTE PARITY ERROR ON WRITE BYTE HIT 
sIF TEST LOCATION NOT EQUA TO 


sPATTERN 2 


s6YTES REVERSED ON — ae CYCLES 
sCLEAR CCR BEFORE EXxI 

sENABLE HALT ON GAEAx 

a i VECTOR 114 

33G0 TO NEXT TEST 


sSAVE ADDRESS THAT — ABORT 


sSAVE CONTENTS OF MSE 
3sRE TURN 


SEQ 0300 


D8 
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SEQ 0301 
TEST - POR BITLS (BYPASS) TEST 

16 788 .SOTTL TEST - POR BITIS (BYPASS) TEST 
16789 sPOR 6IT1S (BYPASS) TEST - THIS TEST WILL VERIFY THAT WHEN BIT<15> IS SET 
16790 sIN A POR AD AN wey eb PE gy He Ge THE SELECTED PDR 
16791 sTHAT WOULD NORMALLY CAUSE A CACHE ACCESS, THE CACHE IS BYPASSED (I.E. THE 
16792 3CACHE LOCATIO® IS INVALIDATED AMD A MAIN MEMORY IS READ. THIS WILL GE DONE 
16793 :6Y FIRST WRITING A TEST LOCATION WITH A KNOWN PATTERN TO ALLOCATE THE ADORESS 
16794 3s THEN THE LOCATION TEN AGAIN WITH THE POR) ENABLED AMD BIT <15> SET 
16795 A MEW PATTERN. THE LOCATION WILL THEN BE READ 
16796 s%@ A MISS GE LOGGED IN THE HIT/MISS REGISTER. THIS READ WILL ALSO 
16797 sQRING VALID DATA INTO CACHE FROM MEMORY. THE PP WILL AGAIN BE ENABLED 
16798 sWITH BIT <15> SET AMD A READ CYCLE DONE. THIS SHOULD INVALIDA 
16799 sNEXT BE OISABLED AND THE LOCATION READ FOR A THIRD TIME. THIS 
16800 BE WITH BIT<15> STILL SET. A MISS SHOULD ALSO LOGGED. LASTLY 
16801 s8IT<15> WILL BE CLEARED AND THE Pew ENABLED AND THE LOCATION AGAIN READ 
16802 sTHIS TIME A CACHE HIT SHOULD BE LOGGED. 
16803 3 
16804 3 
16805 sBGNTST 
16806 sSETUP PW REGISTERS 
16807 sWRITE TEST LOCATION WITH PATTERN 1 
16808 3sSET BIT<15> IN POR FOR TEST LOCATION 
16809 SENABLE fn 8) 
16810 sWRITE TEST LOCATION WITH PATTERN 2 
16611 sOISABLE Pe) AD CLEAR BIT<15> IN POR 
16812 sREAD TEST LOCATION 
16813 sIF MIT/MISS REGISTER BIT<1> SET THEN 
16814 t- ERROR CONDITIONAL BYPASS COESN’T INVALIDATE CACHE 
168615 sENDIF 
16816 3SET BIT<15> IN POR FOR TEST LOCATION 
16817 3 ia nV) 
16818 sREAD TEST LOCATION (SHOULD INVALIDATE CACHE) 
16819 301 hou 
16820 SREAD TEST LOCATION 
168621 sIF MIT/MISS REGISTER BIT<1> SET THEN 
16822 ~ ERROR CONDITIONAL BYPASS DOESN'T INVALIDATE CACHE 
16823 sENDIF 
16824 sCLEAR BIT<15> IN POR 
16825 3 TURN ON MMU 
168626 sREAD TEST LOCATION 
16827 sIF HIT/MISS REGISTER BIT<1> NOT SET THEN 
16828 $- ERROR IN RECORDING HITS IN HIT/MISS 
16829 s ENDIF 
16830 3 TURN OFF pew 
16831 sENDTST 
16832 ’ 
16833 § SOSSCSOSSSSSSSSSSSSSSSESSESESESEESESESESESESEESSESESESOEESEEEEEES 

103446 000004 TST10: 
16834 103450 000240 NOP 
16635 103452 005737 003032 TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
16636 103456 001002 BARE 99% 3: NOT YET 
168637 103460 NOP 3 DEBUG AID 
168638 103462 000512 BR TST1l 33GO TO NEXT TEST 
16839 103464 000240 99%: ROP 

103466 004737 134110 JSR PC. INI TMM 3SETUP MEMORY MANAGEMEMT REGISTERS 
168641 103472 005037 (03162 CLR @eTSTLOC IWRITE TEST LOCATION WITH PATTERN 1 
16842 103476 012737 177777 001124 MOV #177777, $GODAT sSAVE DATA IN ME 


MORY 
16843 103504 052737 100000 172300 BIS #8IT15, KIPORO 1SET BIT1S IN POR FOR TEST LOCATION 
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- POR BIT1S (BYPASS) TEST 


TEST 


003162 


172300 
177520 


111464 
111464 
172300 
172300 
111464 
111464 
111464 
111464 


177572 
177520 


2s: 


4$: 


SRO 
#177777 ,@@TSTLOC 


#6IT1S, KIPORO 
000 


e235 
@6IT15, KIPORO 
SRO 


TSTLOC 
@B8IT15, KIPORO 
SRO 


SeTSTLOC 
HITMIS ,RECDA 
— eRECDAT 
AS 


@BITOO, SRO 
#1000 ,BCSR 


MANAGE MEN 
:CLEAR 6IT1S IN POR FOR TEST LOCATION 
ON BREAK 


sSAVE HIT/MISS REGISTER 
sIF HIT/MISS REGISTER BIT 1 SET 


3 THEN 
sCONDITIONAL BYPASS DOESN’ T INVALIDATE CACHE 
ISET BIT15 IN POR FOR TEST LOCATION 

MANAGE MENT 


s TURN ON MEMORY 
}READ TEST LOCATION 
sCLEAR SF as IN POR 


s TURN OFF 

sREAD TEST LOCATION 

sSTORE HIT/MISS TO REGISTER 2 
sIF HIT/MISS REGISTER BIT 1 SET 


3 THEN 
sCONDITIONAL BYPASS DOESN'T INVALIDATE 0 CACHE 
3 TURN ON MEMORY MANAGEMENT 


iREAD TEST LOCATION ONE MORE TIME 
sSTORE HIT/MISS TO REGISTER 2 
—_— REGISTER BIT 1 NOT SET 


sERROR IN RECORDING HITS IN HIT/MISS 
s TURN OFF MMU 
sENABLE HALT ON BREAK 


s TURN ON MEMORY MANAGEMENT | 
jWRITE TEST LOCATION WITH PATTERN 2 
iT MEMORY T 


iz 
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TEST - FLUSH CACHE TEST 


103710 
103712 


003032 


134110 
001600 


140000 
177572 
010000 


172354 


-S6TTL TEST - FLUSH CACHE TEST 

sFLUSH CACHE TEST - THIS TEST WILL VERIFY THAT WHEN CCR BIT<8> IS 

Hi THE ENTIRE CACHE IS ee gel FIRST 8K BYTES ft ADDRESSES 
WILL BE READ TO ALLOCATE CACHE. THEN THE CACHE WILL BE FLUSHED. 

1 THE SAME SET OF ADORESS WILL THEN BE READ AND THE HIT/MISS REGISTER 

— AFTER EACH READ FOR A MISS TO BE LOGGED. 


IBGNTST 

3sGET FIRST ADDRESS OF 6KB BUFFER 
sINITIALIZE LOOP COUNTER TO 4KWORD COUNT 
300 UNTIL LOOP COUNTER = 0 

? READ BADDRESS- 


sENDOO 
sGET FIRST ADORESS OF 8KB BUFFER 


sINITIALIZE LOOP COUNTER TO 2KWORD COUNT 
Pap lhg ss ~ MISS COUNT TO 4KWORD COUNT 


BADDRESS + 
ICREMENT ADDRESS TO READ EVERY 2WORDS 


F 
t IF HIT/MISS REGISTER BIT<1> SET THEN 
- . OECREMENT MISS COUNT 

’ ENDIF 


sENDOO 

1GET FIRST ADORESS OF @KB BUFFER 
sINITIALIZE LOOP COUNTER » 4KWORD COUNT 
300 UNTIL LOOP COUNTER = 

$. READ SADDRESS+ 


sENDOO 
3sGET LAST ADORESS OF 6KB BUFFER 
2 thy st LOOP COUNTER TO 2KWORD COUNT 


USH 

300 UNTIL LOOP COUNTER = 0 

3. READ BADORESS- 

$- DECREMENT ADORESS TO READ EVERY 2WORDS 
5. IF HIT/MISS REGISTER BIT<1> SET THEN 
$- 
$. 
5 


° DECREMENT MISS COUNT 
ENDIF 


ENDOO 

sa MISS COUNT NOT EQUAL TO 4096. THEN 

— ERROR HITS RECORDED AFTER FLUSHING CACHE 
‘ 


sENDTST 


é 
§ § SSSSSSSSSSSSSSSESSSSSSESSESESSESSSSSSSSSSSESSSSESSSSSSSSSSSSSSESESES 


TST1i1: SCOPE 


MOP 
TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
BNE 856 3 NOT YET 
HOP : DEBUG AID 
BR TsTil2 3:G0 TO NEXT TEST 
99%: NOP 
JSR PC, INI TMM sINITIALIZE Mew 
MOV #1600 ,KIPAR6 sLET PARG6 POINT TO LOW 26K 
MOV #140000 ,R1 3GET ADORESS OF 8K BYTE BUFFER 
INC SRO sENABLE MMU 
MOV 04096., R2 sINIT LOOP COUNTER TO 4K WORD COUNT 
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1%: TST (R1)- 
$08 R2, 
MOV #140000 ,R1 
MOV 02048., 
MOV 04096., RS 
177746 MOV #400, C 
177520 BIC #1000 ,,BCSR 
2s: TST (R1)- 
111464 MOV @eHITMIS ,RECDAT 
111464 BIT -~ han RECDAT 
BEQ 
DEC RS 
38: ADO #2,R1 
soe Re, rz] 
177520 BIS #1000 ,BCSR 
MOV 04096. »R2 
MOV #140000 ,R1 
4$: TST (R1)e 
S08 R2,4% 
02048. ,R2 
MOV #160000 ,R1 
177746 MOV CCR 
177520 BIC #1000 .BCSR 
58: TST -(R1L) 
111464 MOV TMIS ,RECDAT 
111464 BIT @BITO2,RECDAT 
Brg 
DEC R3 
6%: SuB o2,R1 
S08 R2,58 
1778520 BIS #1000 ,BCSR 
CLR SRO 
sd 04096. , RS 
BEQ 8s 
ERROR 24 
8s: 
BR TSTl2 


sSTORE REGISTER 


INCREMENTS (PMI MEMORY) 
sLOOP UNTIL ENTIRE CACHE CHECKED 
sENABLE HALT ON BREAK 
300 FOR 4K 
sSTARTING WITH O 
sALLOCATE IN CACHE 
300 FOR 4K 
300 FOR THE 2ND HALF 
sSTART WITH LAST LOCATION 
sFLUSH CACHE 
sOISABLE HALT ON BREAK 

7 ™ 


sSTORE RECISTER 
sIF MIT/MISS REGISTER NOT EQUAL 


+4 MISS COUNT NOT EQUAL TO 4K WORDS 
SHITS RECORDED AFTER FLUSHING CACHE 


33GO TO NEXT TEST 


a ES ES 


ee a me es ee eee | s - ee  e - -  C e eS — ey 
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TEST 


013737 


003032 


- UNCONDITIONAL BYPASS TEST 


177746 
177520 


111464 
111464 


111464 


SEQ 0305 
.SBTTL TEST - UNCONDITIONAL BYPASS TEST 
s UNCONDITIONAL ‘BYPASS TEST - THIS TEST WILL VERIFY THAT WHEN CCR 
1BIT<9> IS SET, A MEMORY REFERENCE IS FORCED TO MAIN MEMORY. THIS 
sWILL ALSO VERIFY THAT READ AND WRITE HIT INVALIDATE THE CACHE 
sLOCATIONS WHEN BYPASS IS SET. 
3 
3 
s;BGNTST 
$ 
sREAD TEST LOCATIONS TO SETUP POSSIBILITY OF HIT 
sSET CCR BIT<9> 
3 
sREAD FIRST TEST LOCATION 
sIF HIT/MISS REGISTER BIT<1> NOT SET THEN 
S. ERROR IN RECORDING HITS IN HIT/MISS 
‘neal 
;WRITE SECOND TEST LOCATION 
sIF HIT/MISS REGISTER BIT<1> NOT SET THEN 
‘oF ERROR IN RECORDING HITS IN HIT/MISS 
sCLEAR CCR BIT<9> 
F 
sREAD FIRST LOCATION 
sIF HIT/MISS REGISTER BIT<1> SET THEN 
"? ERROR BYPASS DOESN'T INVALIDATE CACHE 
sENDIF 
3 
sREAD SECOND LOCATION 
sIF HIT/MISS REGISTER BIT<1> SET THEN 
ms ERROR BYPASS DOESN'T INVALIDATE CACHE 
sENDIF 
F 
sENDTST 
3 
3 
3 FRSHKEGSESEESEAEHESEEHEACHEHESSEHESSEEHESESHKESHESESOHKEHAHKEHHASSEHRE HE 
TSTl2: — 
TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
BNE oat 3: NOT YET 
NOP : DEBUG AID 
BR TST13 33:G0 TO NEXT TEST 
99%: ROP 
TST BeTSTLIC sALLOCATE FIRST TEST LOCATION 
TST @OTSTLOC+2 sALLOCATE SECOND TEST LOCATION 
BIS @BITO9, CCR sSET CCR a. 9 (CACHE BYPASS) 
1%: BIC #1000 ,.BCSR sOISABLE HALT ON BREAK 
TST @eTSTLOC sREAD FIRST TEST LOCATION 
MOV HITMIS ,RECDAT sSTORE HIT/MISS TO REGISTER 2 
au > eat »RECDAT 1 ISTHE REG. BIT 1 NOT SET 
ERROR +45 FERROR IN RECORDING HITS IN HIT/MISS WITH CCR<9>=1 
2s: CLR @OTSTLOC+2 sWRITE SECOND LOCATION 


MOV HITMIS ,RECDAT 


sSTORE HIT/MISS TO REGISTER 2 





tp or an ee Ee tee i ag Met | Se a OS ate 
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SEQ 0 

TEST - UNCONDITIONAL BYPASS TEST sae 

17024 104266 032737 000004 111464 BIT #8IT02 ,RECDAT sIF HIT/MISS REG. BIT 1 NOT SET 

17025 104274 001001 BNE 3% 3 THEN 

17026 104276 104045 ERROR +45 SERROR IN RECORDING HITS IN HIT/MISS WITH CCCR<9>=1 

17027 104300 005737 003162 3%: TST SeTSTLOC sREAD FIRST TEST LOCATION 

17026 104304 013737 177752 111464 MOV HITMIS ,RECDAT sSTORE HIT/MISS TO REGISTER 2 

17029 104312 032737 000004 111464 BIT #8IT02,RECDAT sIF HIT/MISS REG. BIT 1 SET 

17030 104320 001401 BEQ as 3 THEN 

17031 104322 104025 ERROR +25 sBYPASS DOESN'T INVALIDATE CACHE 

17032 104324 005037 003164 4%: CLR SOTSTLOC+2 sWRITE SECOND LOCATION 

17033 104330 013737 177752 111464 MOV HITMIS ,RECDAT sSTORE HIT/MISS TO REGISTER 2 

17034 104336 032737 000004 111464 BIT #6IT02,RECDAT sIF HIT/MISS REG. BIT 1 SET 

17035 104344 001401 BEQ Sf 3 THEN 

17036 104346 104025 ERROR +25 ;BYPASS DOESN’ T INVALIDATE CACHE 

17037 104350 042737 001000 177746 5%: BIC #6IT09,CCR sRESTORE CCR 

17038 104356 052737 001000 177520 BIS #1000, BCSR sENABLE HALT ON BREAK 


ne ee ee ee SS 
- - 
-_—_—-_— 


J8 
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TEST - WRITE WRONG DATA PARITY TEST 


SEQ 0307 


17041 .SBTTL TEST - WRITE WRONG DATA PARITY TEST 

17042 ;WRITE WRONG DATA PARITY TEST - THIS TEST WILL VERIFY 

17043 iBIT<6> = 1 AND CCR BITS<7,0> = 0,1, A READ MISS OCCURS AFTERA _ 
17044 ;WRITE. TNE WRITE WITH ccR BIT<6> * 1 TO A LOCATION WILL CAUSE A 
pees 4 ys UPDATE AND WRONG P TO BE WRITTEN SO WHEN THE at 
7046 :IS READ INSTEAD OF A HIT ASEING RECORDED THE CACHE PARITY ERROR 
17047 oN CAUSE A CACHE MISS. THIS TEST WILL BE DONE A BYTE AT A TIME. 
17049 :BGNTST 

17050 ;SAVE CONTENTS OF VECTOR 114 

17051 oLET A MECTOR 114 POINT TO ABORT ROUTINE 

17053 sIF MSER NOT CLEAR THEN 

17058 oa as ERROR MSER DOESN'T CLEAR ON WRITE REFERENCE 

17056 sWRITE TEST LOCATION 

17057 3SET BITS<6,0> IN CCR 

17058 ;WRITE TEST LOCATION LOW BYTE 

17059 ;CLEAR CCR BIT<6> (WRITE WRONG DATA PARITY) 

17060 sINITIALIZE ERROR INDICATORS 

17061 3READ TEST LOCATION LOW BYTE 

17062 VIF BIT<i> SET IN HIT/MISS REGISTER THEN 

17063 ~ PARITY ERROR DOESN'T CAUSE MISS 

17065 m3 IF MSER BITS <7:5> ZERO THEN 

17066 “pa ARITY ERROR DOESN'T SET MSER PROPERLY 

17068 3. “ae, SET ERROR IN LOW BYTE INDICATOR 

17070 = ENDIF 

17071 ;ENDIF 

17072 ;CLEAR MSER 

17073 ;IF MSER NOT CLEAR THEN 

A707 ae ERROR MSER DOESN'T CLEAR ON WRITE REFERENCE 
17076 SET CCR B 

17077 - 

pete ;WRITE TEST LOCATION HIGH BYTE 

17079 sCLEAR CCR BIT<6> 

17080 sREAD TEST LOCATION HIGH BYTE 

preee sIF BIT<1> SET IN HIT/MISS REGISTER THEN 

17061 te IF MSER BITS<7:5> NOT SET THEN 

17082 ‘. “ye PARITY ERROR DOESN'T CAUSE A MISS 

17084 te : SET ERROR IN HIGH BYTE INDICATOR 

ayes se se ENDIF 

17067 "8 IF MSER BITS <7:5> ZERO THEN 

s708e be PARITY ERROR DOESN'T SET MSER 

17090 SENDIF ENOIF 

pass RESTORE CONTENTS OF VECTOR 114 

17092 IF ERROR INDICATORS SET THEN 


5 
$ 
é 
17094 ‘. IF oe. IN BOTH BYTES THEN 
se ARITY ERROR IGNORED 
i. 
3 
i 


ELSE 


“ ERROR IN LOW BYTE THEN 
LOW BYTE PARITY ERROR IGNORED 








—K8 
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WRITE WRONG DATA PARITY TEST 


003032 


177744 


177746 
003163 
177746 


111464 
111464 


177744 


sEXIT TST 


Bea aan 


SEQ 0308 


;DATA PARITY ABORT ROUTINE: 


; 
sENDTST 


HIGH BYTE PARITY ERROR IGNORED 


ILLEGAL PARITY INTERRUPT 
RETURN 


$F SSSSSSSSSSSSHSSHSSHSSHSSESSSSSSESSESSSESSSSSESSESSSESESESSEESESESEEEESESES 


TSTi3: SCOPE 
Nop 
TST 


al 


18: 
BIC 


EE: 


2s: 


3%: CLR 


ERROR 
4%: BIS 
MOvVB 


S$: BIT 


CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
99% s NOT YET 

s DEBUG AID 
TST14 33GO TO NEXT TEST 


90114, SLOCOO 


sSAVE CONTENTS OF VECTOR 114 
iLET VECTOR POINT TO ABORT ROUTINE 


@DAPABO , 80114 

MSER s;CLEAR MSER 

1. iIF MSER NOT CLEAR 

+ sMSER DOES NOT CLEAR ON WRITE REFERENCE 
S@TSTLOC iWRITE yd en i TO ALLOCATE CACHE 
#1000 .BCSR sOISABLE HA'.T ON BREAK 

#101, sSET BITS<6, ,0> IN CCR 


;WRITE LOW BYTE WITH BAD PARITY 
sCLEAR WRITE WRONG DATA PARITY BIT 
sCLEAR ERROR INDICATORS 


SeTSTLOC sREAD LOW BYTE OF TEST LOCATION 
HITMIS, R3 sSAVE HIT/MISS 
> ‘ght + 4 BIT 1 SET IN HIT/MISS REGISTER 
3 
aot ~— ERROR DON'T CAUSE A MISS 
+ i MSER — BIT<7:5> NOT ZERO 
+30 sPARITY ERROR DON’T SET MSER WITH CCR<7>=0 
MSER 3CL MSER 
MSER sIF MSER NOT CLEAR 
4$ 3 THEN 
+26 IMSER DOES NOT CLEAR ON WRITE REFERENCE 
BIT CR :SET CCR BIT 6 CWRITE WRONG PARITY) 
0377, @eTSTLOC+ s;WRITE HIGH BYTE OF TEST LOCATION 
TO6, CCR sCLEAR WRITE WRONG PARITY BIT 
BOTSTLOC+1 sREAD HIGH BYTE OF TEST LOCATION 
HITMIS ,RECDAT sSAVE HIT/MISS 
Seren ene + 4 Ost 1 SET IN HIT/MISS REGISTER 
6 3 
+ a ERROR DON'T CAUSE A MISS 
$ sELS 
0340, MSER sIF BITS <7:5> ZERO 
6% 3 THEN 
+30 ;PARITY ERROR DON'T SET MSER WITH CCR<7>=0 


a i rr re ee +e =o ee ee + ee —— 


L8 
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SEQ 0 

TEST - WRITE WRONG DATA PARITY TEST 309 

17154 104624 005037 177746 68: CLR CCR sCLEAR CCR BEFORE EXIT 

17155 104630 013737 003012 000114 MOV SLOCOO, 90114 sRESTORE CONTENTS OF VECTOR 114 

17156 104636 032702 000005 BIT #3, R2 sIF ERROR INDICATORS SET 

17157 104642 001401 BEQ 7$ 3 THEN 

17158 104644 104031 ERROR +31 SPARITY ERROR IGNORED 

17159 104646 005037 177746 7$: CLR CCR sCLEAR CCR 

17160 104652 0135737 003012 000114 MOV SLOCOO, 80114 sRESTORE PARITY TRAP 

17161 104660 052737 001000 177520 BIS #1000,BCSR sENABLE HALT ON BREAK 

17162 104666 000404 BR TST14 :3GO TO NEXT TEST 

a 

1 

17165 104670 011637 001122 DAPABO: MOV (SP),  $B8DADR sSAVE ADDRESS THAT CAUSED ABORT 

17166 104674 104007 ERROR +7 sILLEGAL PARITY INTERRUPT 

17167 104676 000002 RTI 


a + SS ee, CL ----OOrrrn as 


M8 
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TEST - WRITE WRONG TAG PARITY 


17170 .SBTTL TEST - WRITE WRONG TAG PARITY 

17171 sWRITE WRONG TAG PARITY - THIS TEST WILL VERIFY THAT A READ MISS 

17172 sOCCURS AFTER A WRITE WILL ,Yi * 1 AND CCR<7,0> = 0,1. THE WRITE 

17173 :T0 THE LOCATION WILL CAUSE A CACHE UPDATE BUT THE TAG WILL BE 

17174 sWRITTEN WITH aT a WRONG PARITY. WHEN THE LOCATION IS ~ INSTEAD 

17175 OF A CACHE HIT OCCURRING THE PARITY ERROR SHOULD CAUSE A CACHE 

17176 MISS. 

17177 

17178 sBGNTST 

17179 sSAVE CONTENTS OF VECTOR 114 

17160 3sLET VECTOR 114 POINT TO ABORT ROUTINE 

17161 sCLEAR MSER 

17182 3SET WRITE WRONG TAG PARITY BIT<10> 

17163 sWRITE TEST LOCATION 

17164 sCLEAR CCR BIT<10> AND SET ABORT DISABLE BIT<0O> 

171865 }READ TEST LOCATION 

17186 3IF BIT<1> SET IN HIT/MISS REGISTER THEN 

17187 3. IF MSER BITS <7:5> SET THEN 

4 fe PARITY ERROR DOESN'T CAUSE MISS 

1 Bn 

ee 3. PARITY ERROR DOESN'T SET MSER WITH CCR<7>=0 

17191 is 

17192 sENDIF 

17193 3sSET WRITE WRONG TAG PARITY BIT<10> 

17194 sWRITE TO A BYTE OF A TEST LOCA 

17195 3SA T/MISS REGISTER 

17196 sCLEAR WRITE WRONG TAG PARITY BIT 

17197 sIF BIT<1> NOT SET IN HIT/MISS REGISTER THEN 

17196 Sb» ERROR 

17199 sENDIF 

17200 IRE STORE VECTOR 114 

17201 es TST 

17202 

17203 + TAG PARITY ABORT ROUTINE: 

17204 F ILLEGAL PARITY INTERRUPT 

17205 3 RETURN 

17206 sENDTST 

17207 fF SPSSSSSSSSSESSSSSESEEEESESSSEESSSESSSSESSESESESEEEEEEOSESESEEESS 
104700 000004 TST14: 

17208 104702 000240 NOP 

17209 104704 005737 003032 TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 

17210 104710 001002 BNE 99% 3; NOT YET 

17211 104712 NOP ; DEBUG AID 

17212 104714 000453 BR TST15 33GO TO NEXT TEST 

17213 104736 000240 935 NOP 

17214 104720 013737 000114 003012 MOV 90114, SLOCOO sSAVE CONTENTS OF VECTOR 114 

17215 104726 012737 105034 000114 Mov @TAPABO ,&@114 3;LET VECTOR POINT TO ABORT ROUTINE 

17216 104734 042737 177520 BIC #1000 ,BCSP sOISABLE HALT ON BREAK 

17217 104742 37 177744 CLR MSER ;CLEAR MSER 

172186 104746 012737 177746 MOV @6IT10, CCR 3SET ITE WRONG TAG PARITY 

17219 104754 005037 003162 CLR SeTSTLOC ;WRITE LOCATION WITH BAD TAG PARITY 

17220 104760 012737 000001 177746 @#BITOO, CCR ;CLEAR BIT 10 AND SE 

17221 104766 005737 003162 TST S@TSTLOC sREAD TEST LOCATION 

17222 104772 013737 177752 111464 HITMIS ,RECDAT sSAVE HIT/MISS REGISTER 

May 105000 aoe 000004 111464 — @BITO2 .RECDAT ;IF BIT 1 SET IN HIT/MISS REGISTER 


105006 28 
17225 105010 104027 “2 ERROR +27 


; THEN 
sPARITY ERROR DON'T CAUSE A MISS 


SE@ 0310 


aT Geeamecsees 
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TEST - WRITE WRONG TAG PARITY 


105012 
1 


013737 
005037 
052737 
000404 


011637 
104007 
000002 


003012 
177744 
001000 


001122 


000114 2%: 


177520 


SLOCOO, 980114 sRESTORE CONTENTS OF VECTOR 114 
MSER ERRORS 


;CLEAR 


#1000 ,BCSR sENABLE HALT ON BREAK 

TST15 3:;GO TO NEXT TEST 

(SP), $BDADR ;SAVE ADDRESS THAT CAUSE ABORT 
+7 ;ILLEGAL PARITY INTERRUPT 


SEQ 0311 


559 
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SEQ 0312 
TEST - PARITY ABORT TEST 
17237 .SBTTL TEST - PARITY ABORT TEST 
17238 sPARITY ABORT TEST - — Ra WILL VERIFY THAT WHEN CCR<7,0> «= 
17239 31,0, AN ABORT OCCURS ON Ls OF AN INSTRUCTION THAT HAS 
17240 BEEN WRITTEN WITH WRONG PARIT: 
= : 
1 FY 
17243 sOGNTST 
17204 3 SAVE VECTOR es 
17245 sSAVE VECTOR 4 
17246 sLET VECTOR 114 POINT TO ABORT ROUTINE 
17247 sLET VECTOR 4 POINT TO _— ROUTINE 
17248 sCLEAR EXPECTING ABORT FLAG 
17249 iSET CCR<10> WRITE WRONG TAG PARITY BIT 
17250 sWRITE TEST ADORESS 
17251 sCLEAR CCR<10> 
17252 ISET CCR TO @200 ENABLE PARITY ABORTS 
17253 3SET EXPECTING ABORT FLAG 
17254 sREAD TEST ADDRESS 
17255 sIF ABORT FLAG NE O THEN 
17256 8. ERROR IN PARITY ABORT LOGIC 
17257 sENDIF 
17258 iRESTORE be BA te 
17259 sRESTORE VECTOR 
eee ‘si TST 
1 
17262 ; ABORT ROUTINE: IF EXPECTING ABORT FLAG NOT SET THEN 
17263 3 ERROR NO ABORT SHOULD HAVE OCCURRED 
17264 3 ELSE 
17265 3 . CLEAR (EXPECTING) ABORT FLAG 
17266 3 ENDIF 
17267 3 IF MSER ad EQUAL TO 100040 T 
17268 3 ARTTY ABORT LOGIC DOESN: T SET MSER PROPERLY 
17269 3 ENDIF 
17270 3 IF PC = UPDATED PC THEN 
17271 3 ILLEGAL PARITY ABORT 
17272 3 ENDIF 
17273 3 RE TURN 
17274 3 
17275 sENDTST 
17276 § J OSSSSSSSSOSSSSSESEESSESESEESSESEESSSOSSEESEESLOSESEESEESEEEEEEES 
105044 000004 TST15: SCOPE 
17277 105046 000240 Lee 
17276 105050 005737 003032 TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
17279 105054 001002 BNE 99% : NOT YET 
172860 105056 NOP 3; DEBUG AID 
17281 105060 000504 BR TST16 3:GO TO NEXT TEST 
io 105062 000240 99%: wOP 
17284 105064 013737 000114 9003012 Ov 00114, SLOCOO sSAVE VECTOR i 
172865 105072 013737 000004 003014 MOV $.0Cco01 sSAVE VECTOR 4 
or 105100 012737 105216 000114 MOV OABORTR 80114 sLET VECTOR 114 POINT TO ABORT ROUTINE 
F 
fos s TO AVOID CONFUSION ALLOCATE IN CACHE FOLLOWING INSTRUCIONS 
3 
17290 105106 012704 105106 MOV @.,R4 2START WITH CURRENT 
17291 105112 005724 1%; TST (R4)o sREAD A WORD 
17292 105114 022704 105216 CMP @ABORTR RO 3GOT TO ABORT ROUTINE? 


SE  EoEEOEOEOEOEOEOEOEOEOEOEOEEEEeEeEeEe—eeeeeeeeeeeeeeeeeeeeeeeeee 
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PARITY ABORT TEST 
105120 001574 
005000 


105160 


MACRO M1200 16-OCT-84 


177520 BIC 
177746 


177746 MOV 
ABORTI: TST 


177520 
000114 
000004 

ABORTR: MOV 


18: CLR 
177744 28: Cop 


001124 MOV 
38: 


4%: RTI 


—BStOR 
18: BIS 


s 
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18 

RO 

@ -8CSR 
@6IT10, CCR 
@eTSTL 

@#BIT07, CCR 
@eTSTLOC 

RO 

1% 

34 

#1000 ,BCSR 
SLOCOO, 90114 
SLOCO1, o04 
TST16 

MSER RS 

RO 

1% 

(SP), $@DADR 
7 

es 

RO 
a 
#100040, $GDDAT 
35 

(SP), @ABORTI +4 
Pe 


sIF NOT, KEEP ON ALLOCATING 

CLEAR EXPECTING ABORT FLAG 

sOISABLE HALT ON BREAK 

iSET WRITE WRONG PARITY BIT 

sWRITE TEST LOCATION WITH BAD PARITY 
T WiTP BIT 


3 THER 
sPARTTY ABORT LOGIC DOESN’ T WORK 
HALT ON BREAK 


)RESTORE VECTOR 114 
sRESTORE VECTORE 4 


33GO TO NEXT TEST 


sSAVE MSER 
4 4 EXPECTING ABORT FLAG NOT SET 


: 
sSAVE ABORT ADORESS 
sILLEGAL PARITY INTERRUPT 


sELSE 
sCLEAR (EXPECTING) ABORT FLAG 
sIF MSER NOT EQUAL TO 100040 


3 THEN 

sSAVE PROPER MSER SETTING 

SPARITY AS TAT A os T SET MSER PROPERLY 
sIF PC EQUAL TO UPDATE PC 

3 THEN 

T ILLEGAL PARITY INTERRUPT 

sRE TURN 


SEQ 0313 
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TEST - PARITY INTERRUPT TEST 


000240 
000473 
000240 


73 105320 012737 


003032 


000114 
105426 


105326 
105426 


001000 
000100 


D9 
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003012 
000114 


-SBTTL TEST - PARITY INTERRUPT TEST 


sPARITY INTERRUPT TEST - THIS TEST WILL VERIFY THAT WHEN CCR<7,0> «= 
10,0, A PARITY INTERRRUPT OCCURS AFTER — OF AN INSTRUCTION 


:THAT HAS BEEN WRITTEN WITH WRONG PARITY 


’ 

sBGNTST 

sSAVE CONTENTS OF 114 

sSETUP VECTOR 114 TO POINT TO INTERRUPT ROUTINE 
CTING INTERRUPT FLAG 


D HAVE OCCURRED 


= PARITY INTERRUPT Locrc DOESN’ T WORK 
;RESTORE CONTENTS OF VECTOR 114 
“Sipe TST 
VINTERRUPT ROUTINE: IF EXPECTING INTERRUPT FLAG NE 1 THEN 
ERROR NO INTERRUPT SHOUL 
ELSE 
ENDIF 


ENDIF 

IF MSER NE @340 THEN 
ENDIF 
RETURN 


sENDTST 


CLEAR (EXPECTING) INTERRUPT FLAG 
od SAVED PC NE TO UPDATED PC _ THEN 

IF PC = TEST INSTRUCTION PC THEN 

ERROR INSTRUCTION ABORTED 


ILLEGAL PARITY ABORT 


PARITY INTERRUPT DOESN'T SET MSER PROPERLY 


£8 SSSSSSSSSSSSESSSSSSSSSSSSSSSSESSSSSSSHESSEASESSSSSSSSSSSSSSESHESEESE 


TST16: SCOPE 
NOP 


TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
BNE 99% 3 NOT YET 
we : DEBUG AID 
BR TST17 33GO TO NEXT TEST 
99%; NOP 
MOV 00114, SLOCOO sSAVE CONTENTS OF VECTOR 114 
MOV @INTERR 80114 3LET VECTCR POINT TO INTERRUPT ROUTINE 


; TO AVOID CONFUSION ALLOCATE IN CACHE FOLLOWING INSTRUCIONS 


MOV 
16: TST (R4)> 
CMP @INTERR ,R4 
BNE 16 


@. RA sSTART WITH CURRENT 
sREAD A WORD 
sGOT TO INTERRUPT ROUTINE? 


sIF NOT, KEEP ON ALLOCATING 
CLR R1 sCLEAR EXPECT INTERRUPT FLAG 
BIC #1000,BCSR sOISABLE HALT BRE 


BIS #BIT06, CCR 


ON AK 
iSET WRITE WRONG DATA PARITY 


SEQ 0314 
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SEQ 0315 

TEST - PARITY INTERRUPT TEST 

17384 105360 005037 003162 CLR @eTSTLOC sWRITE LOCATION WITH BAD DATA PARITY 

17385 105364 005037 177746 CLR CCR CLEAR WRITE WRONG DATA PARITY 

17386 105370 005101 COM Ri sSET EXPECTING INTERRUPT FLAG 

17387 105372 005737 003162 INTRPC: TST @eTSTLOC sREAD TEST LOCATION 

17388 105376 005701 TST Ri sIF INTERRUPT FLAG NOT EQUAL ZERO 

17389 105400 001401 BEQ 1$ 3 THEN 

17390 105402 104036 ERROR +36 ‘PARITY INTERRUPT LOGIC DOESN’ T WORK 

17391 105404 052737 001000 177520 1%: BIS #1000 ,.BCSR sENABLE HALT ON BREAK 

17392 105412 013737 003012 000114 MOV SLOCOO, 90114 }RESTORE VECTOR 114 

17393 105420 005037 177744 CLR MSE 2 sCLEAR MSER 

17394 105424 000424 BR TST17 33G0 TO NEXT TEST 

17395 

WAS 

17397 1 005701 INTERR: TST Ri sIF EXPECTING INTERRUPT FLAG NOT SET 

17396 105430 001004 1% LTMEN 

17399 105432 011637 001122 MOV (SP), $@DADR | SAVE INTERRUPT ADORESS 

17400 105436 104007 ERROR +7 a PARITY INTERRUPT 

17401 105440 000401 2s 

17402 105442 005001 1%: CLR R1 iCLEAR (EXPECTING) INTERRUPT FLAG 

17403 105444 021627 105376 28: (SP),  @INTRPC+4 sIF SAVED PC NOT EQUAL TO UPDATED PC 

17404 105450 001401 BEQ ry) 3 THEN 

17405 105452 104007 7 PILLEGAL PARITY INTERRUPT 

17406 105454 022737 000340 177744 4%: CMP 0340, MSER sIF MSER NOT EQUAL TO EXPECTED VALUE 

17407 105462 001404 BEQ S$ 3 THEN 

17408 105464 012737 000340 001124 MOV @340, $sGDDAT | SAVE PROPER MSER 

17409 105472 104035 ERROR +35 sPARITY INTERRUPT DON’T SET MSER PROPERLY 

17410 105474 000002 5$: RTI ;RE TURN 
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- MISCELLANEOUS PARITY TEST 


003032 


177744 


000114 
177746 


177746 


-SBTTL TEST MISCELLANEOUS PARITY TEST 

sMISCELLANEOUS PARITY TEST - Th TEST yy * bang | BYPASS CYCLES WITH 
iPARITY ERRORS CAUSE CACHE HIT RESPONSE AND THAT FORCE MISS CYCLES 
ae PARITY ERRORS. 


TBGNT ST 
WRITE A LOCATION WITH BAD PARITY 
sSET BYPASS IN CCR 


sREAD THE LOCATION BACK 
sIF NO HIT OR MSER NOT SET THEN 
i. ERROR 


sENDIF 

sWRITE A LOCATION WITH BAD PARITY AND SET BYPASS 
3sIF MSER SET WHILE READING IT BACK 

3. ERROR 

sENDIF 
sENDTST 


PE ESOSHEELASHOREHSHRRHEHSSEKEEKESHARKAAHAALRSASHSERSALSHESAHESCLS GACT EEASES 
TST17: 


TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
BNE 99% 3 NOT YET 
: DEBUG AID 
BR 1si20 33GO TO NEXT TEST 
99%: woOP 
MOV 
10%: TST CR3)-o 3 
CMP 64% RS sLAST WORD? 
BNE 10% sIF NOT, CONTINUE 


5 
3 CHECK BYPASS AND BAD PARITY 


2 
MOV 90114, SLOCOO sSAVE PARITY VECTOR 
MOV 1% ,80114 sPOINT NEW VECTOR 


BIC #1000 ,BCSR sDISABLE HALT ON BREAK 
BIS @BIT10!:8ITO6!:BITOO,CCR sDATA AND TAG PAR... NO INT. 
CLR @eTSTLOC sWRITE CYCLE 
MOV @BIT09,CCR 3SET BYPASS 
TST @eTSTLOC sBYPASS WITH WRONG PARITY 
ERROR +45 1ERROR 
BR 2s 3 
1%: ADO @4,SP sADJUST STACK 
BIT #340 ,MSER ? 
BNE 2s sIF YES, BRANCH 
ERROR 42 sBYPASS WRONG 
3 
3 CHECK FORCE MISS AND BAD PARITY 
$ 
2s: CLR MSER :;CLEAR MSER 
CLR CCR :CLEAR CCR 
MOV 03% ,00114 sPOINT NEW VECTOR 
BIS @81110:81T06 181700, ccr :DATA AND TAG PAR.. NO INTER 
CLR TLOC sFORCE MISS WITH PARITY 


MOV 014. CCR sFORCE MISS 
sy @eTSTLOC sALLOCATE CACHE 


@. ,.R3 sSTART WITH CURRENT INSTRUCTION 
READ A WORD 
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TEST 


- MISCELLANEOUS PARITY TEST 


104042 38: 
105670 062706 000004 
105674 005037 177746 4%; 


105700 052737 001000 177520 
105706 013737 003012 900114 
105714 012737 000400 177746 
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#81T08,CCR 


SEQ 0317 
sADJUST STACK 
sCLEAR CCR 
sENABLE HALT ON BREAK 
sRESTORE PARITY VECTOR 
sFLUSH CACHE 


H9 
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SEQ 0318 

TEST - MEMORY SYSTEM ERROR REGISTER TEST 

17477 -SBTTL TEST - MEMORY SYSTEM ERROR REGISTER TEST 

17478 sMEMORY SYSTEM ERROR REGISTER a! - THIS TEST WILL VERIFY THE 

17479 sFUNCTIONALITY OF BITS <15> AND <7:5> OF THE MEMORY SYSTEM ERROR 

17480 sREGISTER. THIS TEST WILL USE THE WRITE WRONG PARITY BITS Siteeae 

17461 sAND <6> OF THE CCR) TO WRITE BAD PARITY INTO A \.OCATION. 

17482 sLOCATION WILL THEN BE READ WITH CACHE TRAPS ENABLED AND THE HSER 

17483 sWILL BE CHECKED AFTER THE ABORT FOR THE CORRECT BIT(S) BEING SET. 

17484 sTHIS WILL BE DONE FOR ALL COMBINATIONS OF BITS<10> AND <6> FOR WORD 

17485 sACCE REPEATED FOR ALL COMBINATIONS OF BITS<10> AND <6> FOR 

17486 sBYTE TEST WILL THEN BE TED IME FOR BYTE 

17487 ACCESSES AND ABORTS DISABLED. THE MSER SHOULD CONTAIN BITS <7:5> 

17488 SET TO 1°S AND BIT <15> A ZERO FOR ALL COMBINATIONS. 

17489 

17490 {SGNTST 

17491 sSAVE CONTENTS OF VECTOR 114 

17492 1SETUP VECTOR TO POINT TO ABORT ROUTINE 

17493 sINITIALIZE LOOP COUNTER 

17494 300 UNTIL ALL WORD COMBINATIONS CHECKED 

17495 $. INITIALIZE MSER 


17496 F SETUP CCR FROM CCR TABLE 

17497 ’ READ TEST LOCATION TO ALLOCATE LOCATION WITH DESIRED PARITY 
17498 : CLEAR <10,6> FROM CCR 

17499 ; SETUP FOR T 

17500 3 READ TEST LOCATION sTHIS COULD CAUSE TRAP 
17501 Se IF EXPECTED DATA NE RECEIVED DATA THEN 

17502 3 . ERROR IN SETTING MSER 

17503 F ENDIF 

17504 Ss UPDATE LOOP COUNTER 

17505 sENDDO 

17506 S INITIALIZE LOOP COUNTER 

17507 300 UNTIL ALL BYTE COMBINATIONS CHECKED 

17508 INITIALIZE MSER 

17509 be SETUP CCR FROM CCR TABLE 

17510 “- READ TEST LOCATION TO ALLOCATE LOCATION WITH DESIRED PARITY 
17511 Se CLEAR <10,6> FROM CCR 

17512 “a SETUP CCR FOR ABORT 

17513 Ss READ LOW BYTE TEST LOCATION 

17514 ss GET EXPECTED BYTE DATA FROM TABLE 

17515 Se IF EXPECTED DATA NE RECEIVED DATA THEN 

17516 Ss r ERROR IN SETTING MSER 

17517 be ENDIF 

17518 . INITIALIZE MSER 

17519 be READ HIGH BYTE TEST LOCATsom 

17520 $e GET EXPECTED BYTE DATA FROM TABLE 

17521 IF EXPECTED DATA NE RECEIVED DATA THEN 

17522 Se ERROR In SETTING MSER 

17523 ? ENDIF 

17524 Ss INCREMENT LOOP COUNTER 

17525 sENDOO 

17526 T INITIALIZE LOOP COUNTER 

17527 300 UNTIL ALL BYTE COMBINATIONS CHECKED 

17528 be INITIALIZE MSER 

17529 F SETUP CCR FROM CCR TABLE 

17530 Se READ TEST LOCATION TO ALLOCATE LOCATION WITH DESIRED PARITY 
17531 ™ CLEAR <10,6> FROM CCR 

17532 ke SETUP CCR FOR NO ABORTS 

17533 3 READ LOW BYTE TEST LOCATION 
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SEQ 0319 

TEST - MEMORY SYSTEM ERROR REGISTER TEST 

17534 S. IF RECEIVED DATA NE TO #340 THEN 

17535 . ERROR IN SETTING MSER 

17536 S. ENDIF 

17537 . INITIALIZE MSER 

17538 . READ HIGH BYTE TEST LOCATION 

17539 Ge IF RECEIVED DATA NE #340 THEN 

17540 . ERROR IN SETTING MSER 

17541 Bs ENDIF 

17542 . INCREMENT LOOP COUNTER 

17543 sENDOO 

17544 sEXIT TST 

17545 : 

17546 ;CCR TABLE: 0 

17547 ’ 100 

17546 $ 2000 

17549 3 2100 

17550 sEXPECTED WORD DATA: 0 

17551 ’ 100300 

175S2 $ 100040 

17553 $ 100340 

17554 sEXPECTED BYTE DATA: 

17555 : 

17556 3 100100 

17557 $ 100200 

17558 ’ 100040 

17559 $ 100040 

17560 8 100140 

17561 H 

17562 sABORT ROUTINE: RTI 

17563 H 

17564 sENDTST 

17565 ff PSSOSSSSEECESESESSESEEESS SESEEEESEEEESESEEEESESEEEEEEESEEEEEESS 

105722 000004 TST20: SCOPE 

17566 105724 000240 

17567 195726 005737 003032 TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 

17568 105/32 001003 BNE 99% : NOT YET 

17569 105734 NOP ; DEBUG AID 

17570 105736 000137 106424 JP 10% s YES SKIP THIS 

‘vere 105742 000240 99%: NOP 

17575 105744 013737 000114 003012 MOV 90114, SLOCOO sSAVE CONTENTS OF VECTOR 1 

17574 105752 012737 106466 000114 MOV 80114 }SETUP VECTOR TO all To" ABORT ROUTINE 

17575 105760 012 COC MOV ° Ra SINITIALIZE L LOOP COUNTE 

17576 105764 012700 106426 MOV TBL ,RO sGET ADORESS OF CCR TABLE 

17577 105770 012701 106436 MOV @EXPWOT ,R1 sGET ADORESS OF EXPECTED DATA TABLE 

17576 105774 042737 001000 177520 BIC #1000 ,BCSR sDISABLE HALT ON BREAK 

17579 106002 005037 177744 1%: CLR MSER ee tea MSER DATA 

17560 106006 012037 177746 MOV CRO)+, CCR uP CCR FROM CCR TABLE 

175861 106012 005037 003162 CLR @eTSTLOC S ALLOCATE CACHE LOC. WITH DESIRED von 5g 

17562 106016 012737 177746 MOV @68IT07, CCR sSETUP CCR TO ABORT POSSIBLE BAD PARITY 

175863 106024 005737 003162 TST @eTSTL sREAD TEST LOCATION 

17564 106030 021137 177744 CMP (R1), MSER sIF RECEIVED DATA NOT EQUAL TO EXPECTED 

17585 106034 001405 BEQ 4 sDATA THEN 

175866 106036 0111357 001124 MOV (R1), $GODAT sSAVE PROPER MSER SETTING 

17587 106042 1040 ERROR +35 sMSER NOT SET PROPERLY 

17588 106044 005721 26: TST (R1)+ sINCREMENT POINTER THRU MSER TABLE 

175869 106046 005737 023162 TST @OTSTLOC +6192. 170 INSURE MISS ON THE NEXT LOOP 
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- MEMORY 


TEST 


SYSTEM ERROR REGISTER TEST 


077453 


001000 


177520 


177520 


177746 


177746 


177520 


177520 


177746 
177744 
001124 


177746 
177744 
001124 


JY 


$08 R4, 1$ 
BIS #1000,BCSR 
3;CHECK BYTE OPERATIONS NOW 
MOV 4, R4 
MOV @CCRTBL ,RO 
MOV @€XPBOT, 
BIC #1000,BCSR 
3%: CLR 
TST @eTSTLOC 
MOV CRO), CCR 
CLRB @eTSTL 
MOV @#8IT07, CCR 
TSTB @eTSTL 
CMP (Ri), MSER 
BEQ AS 
MOV (R11), $GODAT 
ERROR +35 
4%: TST (R1)+ 
CLR 
TST SeTSTLOC 
MOV CRO)+, CCR 
CLRB @OTSTLOC+1 
MOV #8IT07, CCR 
TSTB @OTSTLOC+1 
CMP CR1), 
BEQ $ 
MOV (R1), $GODAT 
ERROR +35 
5$: TST CR1)+ 
S08 ° 3% 
BIS #1000 .BCSR 
;REPEAT WITHOUT ABORT 
MOV eS ry R4 
MOV @CCRTBL +2,RO 
BIC #1000 ,B8CSR 
6%: CLR 
TST SeTSTLOC 
MOV >. CCR 
CLRB SéTSTLOC 
MOV #BITOO, CCR 
TSTB @eTSTLOC 
CMP 0340, 
BEQ 7% 
MOV 0340, $GDDAT 
ERROR +35 
7$: CLR 
TST SeTSTLOC 
MOV CRO)+, CCR 
CLRB @eTSTLOC el 
MOV #BITOO, CCR 
TSTB BOTSTLOC+1 
CMP 0340, MSER 
BEQ 8s 
MOV 0340, $GDDAT 
ERROR +35 
8%: SOB R4, 6% 


sLOOP UNTIL ALL 
sENABLE HALT ON 


COMBINATIONS CHECKED 
BREAK 


sINITIALIZE LOOP COUNTER 


sGET ADDRESS OF C 
sGET ADDRESS OF 
HALT ON 


CR TABLE 
ae BYTE DATA TABLE 


sINITIALIZE MSER 
sALLOCATE TO HAVE WRITE BYTE HIT 
FROM TABLE 


sSETUP CCR 


CACHE 9 WITH DESIRED PARITY 
IBLE 


BAD PARITY 


ION 
4 4 RECEIVED DATA NOT EQUAL TO EXPECTED 
SAVE PROPER MSER SETTING 


IHSER NOT SET 


PROPERLY 


POINTER THRU MSER TABLE 
S INITIALIZE MSER 
sALLOCATE TO HAVE WRITE BYTE HIT 
sSETUP CCR FROM TABLE 


sALLOCATE CACHE 


LOC. WITH DESIRED PARITY 


sSETUP CCR TO ABORT POSSIBLE BAD PARITY 


sREAD HIGH BYTE 


OF TEST LOCATION 


sIF RECEIVED DATA NOT EQUAL TO EXPECTED 


T POINTER THRU MSER TABLE 


:00 UNTIL ALL BYTE COMBINATIONS CHECKED 
ENABLE HALT ON BREAK 


sINITIALIZE LOOP COUNTER 


NO 
sREAD LOW BYTE OF TEST LOCATION 
sIF RECEIVED DATA NOT EQUAL TO EXPECTED 


3 THEN 
1SAVE PROPER MSER SETTING 
sMSER NOT SET PROPERLY 


ROM 
S ALLOCATE or 
sSETUP CCR T 
:READ HIGH ovten 


3T 


TABLE 

. WITH DESIRED PARITY 
T ABORT 

OF TEST LOCATION 


5 aetna DATA NOT EQUAL TO EXPECTED 


sSAVE PROPER MSER Age 


sMSER NOT SET 


PROPERL 
300 UNTIL ALL BYTE COMBINATIONS CHECKED 
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177520 
000114 


CLR 

BIS 

MOV 

CLR 
10%: 


3 
? 


EXPBOT: . 


ABROUT: RTI 


sCLEAR oc REGISTER 
sENABLE HALT ON gs 


. 114 
sCLEAR ALL BIT IN CCR 
33GO TO NEXT TEST 


— i a a a a a —— 


‘ 
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TEST - CHECK PARITY ABORTS BLOCKED BY NON-EXISTENT MEMORY ABO 


013737 
013737 
012737 
012737 


003032 


000004 
000114 
106552 
177400 


003012 
003014 


000004 
172354 


-S8TTL TEST - CHECK PARITY ABORTS BLOCKED BY NON-EXISTENT MEMORY ABORT 

MEMORY ABORT - THIS TEST 7 
sVERIFY THAT IF A PARITY ERROR OCCURS ON THE SAME ADDRESS REFERENCE AS A 
sNON-EXISTENT MEMORY ERRCR THAT THE CACHE DATA PATH GATE ARRAY BLOCKS THE 
sPARITY ERROR TO THE J-11 CHIP SET. THIS WILL BE 7 a! USING a _— 
sBIT TO CAUSE A PARITY ERROR IN A CACHE REFERENCE THAT DOES NOT HA 
sCORRESPONDING ADDRESS IN MAIN MEMORY. THE ADORESS WILL THEN BE READ CAUSING 
:B0TH A CACHE PARITY ERROR AND A NON-EXISTENT MEMORY ERROR. TO AVOID HAVING 
3TO SIZE THE ENTIRE MEMORY TO FIND A NON-EXISTENT MEMORY ADORESS THIS TEST 
sWILL USE THE LARGEST By my ADORESS (17757776). THE TEST WILL FIRST READ 
STHIS ADDRESS AND IF A NXM TRAP OCCURS THE TEST WILL BE DONE. IF THE ACCESS 
—- THIS ADORESS DOES NOT TRAP THEN THE TEST WILL BE SKIPPED. 


SGNTST 
oe CONTENTS OF VECTOR 4 
CONTENTS OF VECTOR 114 
sLET VECTOR 4 POINT TO CONTINUE TESTING (A:) 
sLET PARG = €177400 
sACCESS ADDRESS 157776 (PHYSICAL 17757776) 
3IF NO TRAP THEN 
Be - GOTO ENDTST 
+ 


SET OIAGNOSTIC ~ A - wate WRONG PARITY BITS IN CCR 
sWRITE ADORESS 1577 


sCLEAR CCR 

sSET PARITY ERROR ABORT BIT IN CCR 

sLET VECTOR 4 POINT TO CONTINUE TESTING (B:) 

sLET VECTOR 114 a ng TO NXM-PARITY ERROR ROUTINE 
- gay ADORESS 1577 


TRAP THEN 
; ERROR IN ABORT LOGIC 


AR CCR 
sRESTORE CONTENTS OF VECTOR 114 
sRESTORE CONTENTS OF VECTOR 4 


sEXIT TST 
3 

INXM-PARITY ERROR ROUTINE: RESET STACK AFTER TRAP 

, ARITY ABORT NOT BLOCKED BY NXM 
3 GOTO B: 

SENDTST 


§ J SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSESSSSSSSSSSSSSSSSSSSSESSSSSSSESES 


TST21: SCOPE 
NoP 


TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
BNE 99% 3 NOT YET 
NOP ; DEBUG AID 
BR TST22 3:GO TO NEXT TEST 
99% NOP 


MOV a4, SLOCOO 
MOV 9114, SLOCO1 


sSAVE CONTENTS OF VECTOR 4 
sSAVE CONTENTS OF VECTOR 114 


MOV “1%, aoe 3LET VECTOR 4 POINT TO CONTINUE TESTING 
MOV #177400 ,KIPAR6 


sLET PAR6 = OFFSET TO HIGHEST MEMORY 
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- CHECK PARITY ABORTS BLOCKED BY NON-EXISTENT MEMORY ABO 


177572 
157776 
000004 
001000 
000102 
157776 
000200 
106630 


106670 
157776 


177520 
177746 


177746 
000004 
000114 


177520 
000004 
000114 


1%: 


2s: 
ABOEXT: 


M9 


SRO 
90157776 
ABOE 


sTURN ON MMU 

sACCESS ADDRESS 17757776 
sIF NO TRAP SKIP TEST 
sRESET STACK yt TRAP 


sOISABLE HALT BRE AK 
sSET DIAG. AND WRITE ean PARITY BITS 
sWRITE TO ADDRESS 177577 


sCLEAR CCR AND SET PARITY. ABORT BIT 
sLET VECTOR 4 POINT TO CONTINUE TESTING 
sLET VECTOR 114 POINT TO ERROR ROUTIME 
sREAD ADDRESS 17757776 (SHOULD TRAP) 
sNXM AND PARITY ABORT DIN‘ T HAPPEN 


sENABLE HALT ON BREAK 
sRESTORE VECTOR 4 
RESTORE VECTOR 114 


; 
+3GO TO NEXT TEST 


sRESET STACK AFTER TRAP 
sPARITY ABORT NOT BLOCKED BY NXM TRAP 


N9 
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SEQ 0324 
TEST - MULTIPROCCESSING INSTRUCTION TESTS 
17761 -S8TTL TEST - MULTIPROCCESSING INSTRUCTION TESTS 
17762 sMULTIPROCCESSING INSTRUCTION TESTS - THIS TEST WILL VERIFY THAT THE MULTI- 
17763 sPROCCESSING INSTRUCTIONS DO A BYPASS OF THE CACHE. THIS TEST WILL NOT VERIFY 
17764 3; THE REST OF THE FUNCTIONALITY OF THESE TIONS BECAUSE THAT WILL ALREADY 
17765 s;HAVE BEEN TION TESTS. THE TEST WILL FIRST ALLOCATE 
17766 ;AN ADDRESS IN CACHE THEN A TSTSET INSTRUC BE AT THAT ADORESS 
17767 3A HIT SHOULD BE RECORDED ON {HE ACCESS. NEXT, THE ADORESS WILL BE READ AND 
17768 3A MISS SHOULD BE RECORDED BECAUSE THE FORCED BYPASS ON THE rstser Be 
17769 3SHOULD HAVE INVALIDATED THE CACHE ENTRY. THE SAME SEQUENCE WILL THEN BE 
17770 sREPEATED FOR THE WRTLCK INSTRUCTION. 
17771 
17772 ;BGNTST 
17773 sREAD TEST LOCATION TO ALLOCATE CACHE 
17774 :00 TSTSET INSTRUCTION 
17775 7 HIT/MISS os? BIT 3 NOT SET OR BIT 2 SET THEN 
17776 ERRGR IN MULTI-PROCESSOR HOOKS 
17777 iENDIF 
17778 sREAD TEST LOCATION (ALSO ALLOCATES CACHE FOR WRTLCK) 
17779 3:00 WRTLCK INSTRUCTION 
17780 sIF MIT/MISS REGISTER BIT 3 NOT SET OR BIT 2 SET THEN 
17781 w ERROR IN MULTI-PROCESSOR HOOKS 
17762 sENDIF 
17783 ;READ TEST LOCATION 
17784 300 ASRB INSTRUCTION 
17785 TF HIT/MISS REGISTER BIT 3 NOT SET OR BIT 2 SET THEN 
17786 ERROR IN MULTI-PROCESSOR HOOKS 
17787 SENDIF 
17788 sENDTST 
pha s;NOTE: THE CODE IS POSITION DEPENDENT 
17791 ff SSSSSSSSSSESSSSHSSSSESSESESHSEESESEEESEEESSSEESHEEEEHEEEEEEEEEEE 
106700 000004 TST22: SCOPE 
17792 106702 000240 
17793 106704 005737 003032 TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
17794 106710 001002 99% ; NOT YET 
17795 106712 NOP ; DEBUG AID 
17796 106714 000477 BR TST23 33:GO TO NEXT TEST 
head 106716 000240 99% wOoP 
17799 106720 042737 001000 177520 BIC #1000 ,B8CSR sOISABLE HALT ON BREAK 
17800 106726 005737 003162 T TSTLOC sREAD TEST LOCATION TO ALLOCATE CACHE 
17601 3 TSTSET TSTLOC 300 TSTSET INSTRUCTION 
17802 106732 007237 7% 7237 3 THESE NEXT TWO LOCATIONS ARE THE TSTSET 
17803 106734 003162 .WORD TSTLOC sINSTR. BECAUSE THE ASSEMBLER WAS NOT READY 
17804 106736 013737 177752 111464 MOV HITMIS ,RECDAT sSTORE REGISTER 
17805 106744 032737 000010 111464 BIT BITs, RECDAT 3IF HIT/MISS REGISTER BIT 3 NOT SET 
17606 106752 001001 BNE 1% 3 THEN 
17807 106754 104045 ERROR +45 JERROR IN RECORDING HITS IN HIT/MISS 
17808 106756 032737 000004 111464 1%: BIT #8172, RECDAT sIF HIT/MISS REGISTER BIT 2 SET 
17609 106764 001404 BEQ 2s 3 THEN 
17810 106766 013737 106732 001126 MOV ae7$, sBODAT sSAVE OPCODE 
. 17611 106774 104041 ERROR 41 sMULTI-PROCESSOR HOOK INSTRUCTION DOESN’ Ti CAUSE MIS 
17612 326: WRTLCK TSTLOC 300 WRILCK INSTRUCTION 
17813 106776 007337 2s: .WORD 7337 3 THESE NEXT TWO WORDS ARE THE WRTLCK 
17814 107000 003162 .WORD TSTLOC sINSTR. BECAUSE THE ASSEMBLER WAS NOT READY 
17815 107002 013737 177752 111464 MOV HITMIS ,RECDAT sSTORE REGISTER 


17616 107010 032737 000010 111464 BIT @BITS,RECDAT ;IF HIT/MISS REGISTER BIT 3 NOT SET 





B10. 
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Test 


107112 


000004 111464 
106776 001126 


177752. 111464 
000010 111464 


001000 177520 
000004 111464 


107042 001126 


- MULTIPROCCESSING INSTRUCTION TESTS 


4%: 


5%: 


SEQ 0325 
3% 3s THEN 
045 sERROR IN RECORDING HITS IN HIT/MISS 
ie ocaaase: LIF MIMS REGISTER BIT 2 SET 
802%, $BO0AT sSAVE OPCODE 
41 sMULTI-PROCESSOR HOOK INSTRUCTION DOESN’ TT CAUSE MIS 
TSTLOC sTHE THIRD — INSTRUCTION 
MITMIS ,RECDAT | STORE REGISTER 
a »RECDAT < > ee REGISTER BIT 3 NOT SET 
045 FERROR IN RECORDING HITS IN HIT/MISS 
#1000 .BCSR sENABLE HALT ON AK 
@BIT2,RECDAT VIF MIT/MISS REGISTER BIT 2 SET 
TsT23 ssEXIT TEST 
e043, sBODAT sSAVE OPCOUE 
o41 sMULTI-PROCESSOR HOOK INSTRUCTION DOESN’ TT CAUSE MIS 


C10 
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TEST - DATA STORE RAM TESTS 


107114 


178692 107124 


003032 


SEQ 9326 


-SBTTL TEST ~- DATA STORE RAM TESTS 

sDATA STORE RAM TESTS - THERE ARE TWO TESTS FOR THE DATA STORE RAM. 

sTHE FIRST TEST WIiL BE A NO DUAL ADDRESSING TEST AND THE SECOND 

sTEST WILL BE A DATA RELIABILITY TEST. THE NO DUAL ADORESSING TEST 
wR EACH WIRD THE CACHE 


IFY THE CONTENTS WITH A READ OF EACH ADDRESS. THEN 
s6YTE WILL BE WRITTEN WITH ITS ADDRESS AND CHECKED. THE DATA 
a TEST THAT WILL BE USED IS A TEST CALLED MOVING INVERSIONS. 


SOGNTST i 
sSETUP PP REGISTERS TO HAVE BYPASS ON KERNAL SPACE AND NO 
ON USER SPACE 


3 BYPASS 
sLET PS EQUAL KERNAL FOR CURRENT MODE AND USER FOR PREVIOUS 
3 MODE 


sENABLE PPD 
3sGET FIRST ADDRESS OF 4K WORD DATA BUFFER 
sCLEAR DATA TO GE WRITTEN 


sSET OIAGNOSTIC BIT (BIT<1>) IN CCR 
s00 UNTIL DATA TO GE WRITTEN EQUALS 20000(8) 
WRITE DATA TO ADDRESS 


ADD 2 TO ADORESS 
" AOD 2 TO DATA TO BE WRITTEN 
1GET FIRST yoy Ay 4K WORD DATA BUFFER 


sCLEAR CTED DATA 
:00 UNTIL EXPECTED DATA EQUALS 20000(8) 
s. READ ADDRESS 


s. IF RECEIVED DATA NE EXPECTED DATA THEN 

t. bor GOTO DATA STORE PARITY ERROR ROUTINE 
3. 

3. ADD 2 TO EXPECTED DATA 

s. ADD 2 TO ADDRESS 


+ ENDDO 
sGET FIRST ADORESS OF = oes DATA BUFFER 


t- WRITE DATA TO ADDRESS 
$. ADD 1 TO ADDRESS 
ve ADD 1 TO DATA TO BE WRITTEN 


Get FIRST ADORESS OF 8K BYTE DATA BUFFER 
EXPECTED DATA 

100 UNTIL EXPECTED om EQUALS 20000( 8) 
READ ADDRESS 


te IF RECEIVED DATA NE EXPECTED DATA THEN 
$- bor GOTO DATA STORE PARITY ERROR ROUTINE 
3. 
Bie ADO 1 TO EXPECTED DATA 
3. ADO 1 TO ADDRESS 
8 
sENDTST 
- J OOCOSCSOSESSSOESSSSESSSEEEESSSESEESSHSESESESESESESESEOEESEEEEEES 
TST23: 
NOP 
TST CCHPAS pPAVE eae ENOUGH INCLUSIVE PASSES? 
BNE 99% 3 NOT YE 


COKDACO KDJ11-8 CLUSTER DIAG. 


Test 


- DATA STORE RAM TESTS 


MACRO M1200 


172354 


177746 
177520 


177746 


001122 


001160 
001160 


177746 


177746 


001122 


001160 
001160 


18; 


100%: 


4%: 
5$: 


6%: 


7%: 


1018: 


96; 


a be 


gacaggees 


@ 
bad 
“ 


Gap 


D1O 
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TST24 

PC, INI TMM 
@2000, KIPAR6 
SRO 

eae 
#6ITO1, CCR 
#1000 ,B8CSR 

Ri ° (Re de 
62, Ri 

1s 

@BIT01, CCR 
#140000, 

Ri 

Rl, #20000 
$3 

Ri, 

@BIT15, sBOADR 
(R2)+, RECDAT 
HITMIS, s$TMPO 
@BIT04, STHPO 
1008 

AS 

Rl, RECDAT 
as 

043 

2, Ri 

38 

on 
@BITO1, CCR 

Ri ° ( R2 ) ° 
#1, R1 

6% 

#BITO1, CCR 

#1 ° 

R1 

Ri, 920000 
10% 

Rl, ¢ 
@68IT15, sBOADR 
(R2)< ° RECDAT 
HITMIS, sTMPO 
@BITO4, $TMPO 
101% 

045 

Ri, RECDAT 
9% 

«43 

#1, R1 


3 DEBUG AID 
33GO TO NEXT TEST 


sSETUP MP REGISTERS 
sLET PARG MAP TO ADDRESS 200000 
MANAGEMENT 


s TURN ON 

sGET FIRST ADDRESS OF 4K WORD BUFFER 
sINIT DATA TO BE WRITTEN 

sSET DIAG a IN CASE NO MEMORY PRESENT 
sDOISABLE HALT ON BREAK 

300 UNTIL ALL Soena sees WRITTEN 

sIF OONE GO CHECK DATA 

SWRITE DATA TO ADORESS 

sUPDATE DATA BY 2 (WORD BOUNDARY) 
sENDOO 

CLEAR Senmuet ys Oey 


RAM ERROR 
sIF RECIEVED DATA NOT EQUAL TO EXPECTED 


$ 
sDATA RAM ERROR 
sUPDATE EXPECTED DATA BY 2 


sENDOO 

sGET FIRST ADORESS OF 4K WORD BUFFER 
sINIT DATA TO BE WRITTEN 

sSET DIAG ov IN CASE NO MEMORY PRESENT 
300 UNTIL ALL ~ pity WRITTEN 

sIF DONE GO CHECK DATA 

sWRITE DATA TO ADORESS 

sUPDATE DATA BY 1 (BYTE BOUNDARY) 


sENDOO 

sCLEAR DIAGNOSTIC BIT 

T ADDRESS OF 4K WORD BUFFER 
UN 

sIF DONE EXIT TEST 

saat FOR ERRORS 


}READ TEST LOCATION 
JA REGIST 


RROR 
HIP RECIEVED DATA NOT EQUAL TO EXPECTED 


IDATA RAM ERROR 
sUPDATE EXPECTED DATA BY 1 
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TEST - DATA STORE RAM TESTS 


17950 107436 000747 BR 83 
17951 107440 052737 001000 177520 10%: 81S #1000,BCSR 
17952 107446 005037 177572 CLR SRO 


17953 


ees ee + - 


sENDDO 
sENABLE HALT ON BREAK 
3 TURN OFF MMU 


i ee ee + a ee ee ee ee ee ee es e+ ee 


F10 
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TEST - TAG STORE RAM TESTS 


:TAG STORE RAM TESTS - THERE ARE TWO TESTS FOR THE TAG STORE RAMS. THE FIRST 
sTEST IS AN a gt TEST TO ENSURE NO DUAL ADDRESSING OF THE TAG STORE. 

oe ae ao —_ “MOVING INVERSIONS” TEST THAT CHECKS THE DATA RELIABILITY 
; . 


1DUAL ADDRESSING TEST - THIS WILL BE DONE BY FIRST FLUSHING THE CACHE, THEN 
sTHE FIRST were LOCATIONS (BLOCK 0) WILL BE WRITTEN WITH ADDRESSES THAT 
sWILL CAUSE A INCREMENTING P a lansaae knak uni of ae kas tae 
sSTORE RAM, NEXT THE ENTIRE 4K ADORESS RANGE WILL BE READ. THE HIT/MISS 
sREGISTER SHOULD ONLY REPORT HITS ON THE ADDRESSES THAT WERE ALLOCATED. THIS 
sPROCESS WILL. BE REPEATED FOR EACH BLOCK. 


3 
sINITIALIZE LOW ADDRESS 
sSETUP AND ENABLE PU 
S INITIALIZE BLOCK COUNTER 
300 UNTIL ALL BLOCKS Lp (6 TIMES) 
$. FLUSH CACHE AND SE T DIAGNOSTIC BIT 

LET CURRENT ADORE LOW ADORESS 
INITIALIZE ALLOCATION COUNTER 
DO UNTIL ENTIRE BLOCK ALLOCATED (1000 TIMES) 
hos READ CURRENT ADDRESS 


WRITE CURRENT ADDRESS 


UPDATE CURRENT ADORESS (ALSO ADD 290 TO PAR) 
FOR 1/0 PAGE WRITE THE SAME ADDRESS AS BEFORE 


INITIALIZE GOOD ADDRESS 

INITIALIZE CURRENT ADORESS 

INITIALIZE LOCATION COUNTER 
CONTENT 


SAVE Ss O OR 114 
LET = ge 114 POINT TO TAG STORE PARITY ABORT ROUTINE 
DOO UNTIL ALL LOCATIONS gor (1000 TIMES) 


INITIALIZE CHECK 
” UNTIL ADORESS IN CACH BLOCK CHECKED 
CURRENT ADDRESS 


READ 
4 HIT THEN 
IF cemne ~  -aee NE GOOD ADDRESS THEN 


ENDIF 
IF CURRENT ADORESS EQUAL GOOD ADDRESS THEN 
° ERROR 


ENDIF 


ENDIF 
UPDATE GOOD ADDRESS — #2) 
UPDATE CURRENT ADDRESS 


ENDDO 
UPDATE LOW ADDRESS (ADD #2000) 


ELSE 


ENDDO 
ENDOO 
;OISABLE MMU 


sRESTORE VECTOR 114 
sENDTST 


| 
| 
-SBTTL_ TEST - TAG STORE RAM TESTS 


£ SSSSSSSSSSSSESSSSESSESSESSESSSSSSSESSESESSESSESESSESHSESSESSESEESESEHEEHEESEEED 





COKDACO KDJ11-8 CLUSTER DIAG. 
TAG STORE RAM TESTS 


TEST - 


107472 
107474 


000004 
000240 
005737 
001003 
000240 
000137 
000240 


013737 


G10 > 
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TST24: SCOPE 
NOP 
TST CCHPAS 
BNE 99% 
woe 
JP 183 
99%: NOP 
001160 MOV 04 , $THPO 
MOV 020% ,804 
003016 MOV #140000 , LOWADO 
JSR ° THM 
INC 
172516 MOV @BIT04 ORS 
003154 MOV @-10, LOOPIN 
1%: MOV Ri 
177520 9%: BIC #1000 ,BCSR 
CLR KIPARS 
177746 MOV #402, CCR 
111504 MOV LOWADD, CUR 
003152 MOV @-400, ALLCTR 
172354 28: oe —— KIPARS 
172314 BIS @61T15,KIPDR6 
MOV @CURADD ,R2 
172314 BIC @6IT15,KIPORG6 
4 » SCURADD 
3%: CLR SCURADO 
111504 4%: ADD 2, CURADO 
172354 ADO #200, KIPARG6 
172354 chp #177600 ,KIPARG 
BNE 10% 
172354 Su8 @200 , KIPARG 
108: INC ALLCTR 
BLT 2s 
177746 BIS @BITO2, CCR 
MOV LOWADO, G 
ADD Ri, 
111504 MOV #140000 , CURADOD 
ADD Rl, CUP. 
CLR KIC MRS 
ASH @6,R1 
BOO R1 , KIPARG 
003152 MOV @-200, ALLCTR 
111460 5%: MOV @-10, OCOUNT 
001122 6%: MOV » $BOADR 
1 BIC #160000 , $BDADR 
177746 BIC @6ITO2, CCR 
TST SCURADD 
111464 MOV HITMIS, RECDAT 
111464 = sorte. RECDAT 
003020 ae CURADD, GOODAD 
EREOR <> 
BR Bs 


HAVE DONE ENOUGH INCLUSIVE PASSES? 


F 

3 NOT YET 

s DEBUG AID 

s YES SKIP THIS 


sSTORE TIMEOUT VECTOR 
sPOINT NEW 
SINITIALIZE L0w LOW ADDRESS (USE PAR6) 


sINITIALT 


sENABLE MMU 
sENABLE 22-BIT MAPPING 


TED 
AVOID PHI MEMORY 


HALT ON BREAK 
sSET UP PARG FOR THIS TEST 


sFLUSH CACHE AND 


SET DIAG BIT 


sGET FIRST ADORESS IN 


CURRENT BLOCK 
300 UNTIL ALL ADDRESSES ALLOCATED 


sIF ADDRESS LESS THAN 32K 
THEN 


iMRITE ALLOCATE 
sELSE 

i MRITE CURRENT 
sUPDATE CURREN 


sBRANCH IF NO 


ORE CURRENT DATA 
sALLOCATE NEXT ACCESS 


ADDRESS 
iT ADORESS 


sREACHED te one 


s00N‘T UPDATE pan FOR I/0 PAGE 
sIF ALL ADDRESSES ALLOCATED 


8 
sRUN WITH FORCE MISS 
sINITIALIZE GOOD ADDRESS 


F 
3sGET FIRST 


ADORE SS 
sSTART WITH 1 CR 2 LOCATION 


3 
sMAKE SURE ON THE RIGHT BOUNDARY 
300 UNTIL ALL LOCATIONS CHECKED 


CASE OF 
sCLEAR PAR BITS 


:CLEAR FORCE MISS 
CURRENT ADORESS 


sREAD 
sSTORE REGISTER 


s00 UNTIL ADDRESS IN EACH BLOCK CHECKED 
ERRORS 


+ 4 ACCESS WAS A HIT 


3 THEN 
sIF CURRENT seenese NOT EQUAL TO GOOD 


sADORESS THE 


sERROR IN TAG STORE 
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TAG STORE RAM TESTS 


TEST - 


023737 
001001 


111504 


001000 
000004 
111460 
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003020 78: CMP CURADO, GOODAD 
BNE 83 
ERROR 047 

111504 8: ADD #1000, CURADD 

177746 BIS #6ITO2, CCR 
INC OCOUNT 
BLT 6% 

003020 ADO 4, GOODAD 

111504 SUB #7774, CURADOD 

172354 ADO #400, KIPARG 
INC ALLCTR 
BLT 5$ 

177520 BIS #1000 ,BCSR 
ADO 2, Ri 
CMP 62, R1 
BNE 30s 
JP 9$ 

003016 30%: ADO #2000, LOWADD 
INC u 
BGE 15% 
JP 1s 

177746 15%: MOV 9400, CCR 
CLR SRO 

000004 MOV sTMPO 304 

172516 me BIC @BITO4 MARS 
BR TST25 

208: RTI 


H10 


sIF CURRENT ADDRESS EQUAL GOOD ADDRESS 


+4 ADDRESS NOT CHECKED FOR EACH BLOCK 


SUPDATE GOOD ADDRESS 
s INCREMENT IN 2 WORDS 


sIF ALL ADDRESSES CHECKED 


sENDOO 

SEWABLE HALT ON BREAK 

s;PREPARE FOR THE 2ND PASS THRU 
sD0NE TWICE? 

sIF SO, EXIT 


sUPDATE TO NEXT BLOCK TO BE ALLOCATED 
sIF ALL BLOCKS WERE TESTED 
s 


sENDOO 
sCLEAR DIAGNOSTIC BIT 
sDISABLE MU 

sRESTORE TIMEQUT VECTOR 
sENABLE 22-BIT MAPPING 


33GO TO NEXT TEST 


SEQ 0331 


TEST - STANDALONE MODE TEST 


003032 


177746 


-SBTTL TEST - STANDALONE MODE TEST 


Oia? (| Pema se 
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sTHIS TEST VERIFIES THAT NMX CAN BE CREATED IN STANDALONE MODE. 


SALLOCATE INSTRUCTIONS IN CACHE 
sGUARANTEE MISS ON TEST LOCATION 
sIN STANALONE MODE ACCESS TEST LOCATION 


sIF NO TIMEOUT THEN 


3. 
sENDIF 


a 
2 J SSSSSSSSSSSSSSSSSSSSSSSSSSSSSESSSSESSESESSESSESESESESSEESEEESEEEESSEDE 


TST25: 


5$: 


2108: 


SCOPE 


CCHPAS 
99% 


TST26 


@340 
#8IT09,BCSR 
#6IT08 ,.BCSR 


a0 
#6IT08 .BCSR 
09,BCSR 


sHAVE DONE ENOUGH INCLUSIVE PASSES? 
3s NOT YET 


s DEBUG AID 
3:GO TO NEXT TEST 


sFLUSH CACHE 
sSTART WITH CURRENT INSTRUCTION 
sREAD A WORD 


sIF YES, BRANCH 


sRESTORE STACK 
sAND TIMEOUT VECTOR 


a ee nr ee en ee 


SEQ 0332 


Hr 


J10 
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TEST - MOVING INVERSIONS TEST FOR DATA RAMS 


SEQ 0333 


18137 SBTTL TEST _- MOVING INVERSIONS TEST FOR 
. DATA RAMS 
18138 MOVING GINVERSIONS TEST FOR DATA RAMS - THE TEST IS STARTED AFTER LOADING THE 
18140 es SABSTITUTED IN A BIT POSITION AWD THE KEM WORD TS UAITTON: NEXT Tre 
18141 ;ADORESS IS READ TO VERIFY THE NEW CONTENT ane ot 
S. THIS IS REPEATED F 
18142 LIME WORO LEAVING THE AAmAy FILED WITH 1'S, THE, WNOLE PROCESS 15 REPEATED | 
aa 

18144 sDIRECTION. /ETNALLY YTHING IS REPEATED FOR EACH BIT POSITION BEING THE 
18146 SONLY A SINGLE art ATA TIME event SOURT SIT WILL BE DONE CONCUPNEN —— 
18147 s THES TEST RUNS IN STANDALONE MODE. . — 
18149 3;8GNTST 
18150 ;SETUP AND ENABLE MMU 
18151 SETUP CCR TO ABORT PARITY ERRORS 
18153 300 IN STANDALONE 
18153 100 IN MODE FOR EACH HALF SEPARATELY 
18154 : WOSEQ = #1 
18155 LET ADDLSB = #1 
18156 ;D0 UNTIL ADOLSB EQ #20000 
18157 “ LET CURDAT = 0 
18158 6 LET RITEDA = @1 
18159 :. LET NEWDAT = #1 
18161 “e wi ae FeTAOD EQUAL FIRST ADORE 
18161 - : SS OF 4K BYTE BUFFER 
18162 : i LET LASTAD EQUAL LAST ADORESS OF 4K BYTE BUFFER 
18164 : 
18164 * “ LET FSTADD EQUAL LAST ADDRESS OF 4K BYTE BUFFER 
18165 : hee LET LASTAD EQUAL FIRST ADORESS OF 4K BYTE BUFFER 
18167 * LET CURADD = FSTAOD 
18168 “ss LET DCOUNT = #0 
18170 * cE VECTOR 116 POINT. 70 BATA STORE PAR 

é TY 
16171 ‘ DO UNTIL DCOUNT EQ #10 heap ct 
18178 Be LET RECDAT = 
18173 - IF RECDAT NE CURDAT THEN 
18174 :. LET Ri EQUAL CURRENT DATA 
18175 : “ast GOTO DATA STORE PARITY ERROR ROUTINE 
18177 Ms IF OCOUNT GT @3 THEN 
18173 ; LET SCURADD = SCURADD CLEARBY RITEDA 
18180 : ate: LET SCURADD = SCURADD SETBY RITEDA 
18182 :. LET RECDAT = SCURADOD 
18183 .. IF RECDAT NE NEWDAT THEN 
18184 :. ; LET Rl EQUAL NEW DATA 
18185 ‘- ee GOTO DATA STORE PARITY ERROR ROUTINE 
18187 a IF CURADD EQ LASTAD THEN 
18186 ‘. IF RITEDA = @210 THEN 
18189 :. IF DCOUNT NE @7 T 
18190 :. : LET CURDAT = 0377 
18191 - ; LET RITEDA = 1 

‘ LET NEWDAT = 0376 


: . ENDIF 


i ——— a a ee + SC hr VO OO —_- -—— 
— _ 


K10 | 
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SEQ 0334 
TEST - MOVING INVERSIONS TEST FOR DATA RAMS 

18194 $. ELSE 
18195 . . LET CURDAT = NEWDAT 
18196 . ROTATE RITEDA 
18197 "Ee IF ween * mi 3 THEN 
16198 $. T NEWDAT = NEWDAT CLEAREDBY RITEDA 
18199 rt . . ELSE 
18200 Be ‘ ° . LET NEWDAT = NEWDAT SETBY RITEDA 
18201 be ‘ . ENDIF 
18202 $. ENDIF 
18203 Bs INCREMENT DCOUNT 
18204 Be ‘ LET CURADD = FSTADD 
186205 Ss ELSE 
162C6 3. » <4 —, . #1 THEN 
18207 S< T CURADD = CURADD + ADDLSB 
18208 "o 2 CARRY THEN 
18209 8 . LET CURADD = CURADD + #1 
18210 $6 . ENDIF 
16211 3. ELSE 
18212 Be . LET CURADD = CURADD - ADOLSB 
16213 3. IF CARRY THEN 
16214 te " LET CURADD = LASTAD - ADOLSB 
16215 Se LET CURADD = CURADD - #1 
186216 3 . . ENDIF 
16217 Se ‘ ENDIF 
16218 “ ENDIF 
16219 Sa ENDOO 
18220 ie IF FWOSEQ EQ #1 THEN 
18221 3. LET FWOSEQ = #0 
18222 te ELSE 
18223 3. ‘ ROTATE ADOLSS 
18224 3 LET FWOSEQ = #1 
18225 Be ENDIF 
18226 sENDDO 
16227 ;RESTORE VECTOR 114 
18228 sENDTST 
186229 
186230 fs PSSSSSSSSSSSSESEESESEESEESEESESEESEESEESESEESHESESEEEEESEESEEES 

110372 000004 TST26: SCOPE 
16231 110374 000240 NOP 
186222 110376 005737 003032 TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
16233 110402 001003 BNE sae ; NOT YET 
16234 110404 NOP ; DEBUG AID 
16235 110406 000137 111506 JP ENDMOV ; YES SKIP THIS 
pte 110412 99% NOP 
186238 110414 032777 000200 070516 BIT @81IT07,8SWR sRUN THIS TEST? 
16239 1 001 BNE 100% s IF . GO 00 IT 
186240 110424 000137 111506 seep ENDMOV sOTHERWISE, GO TO NEXT TEST 
16241 110430 042737 001000 177520 100%: BIC #1000 .B8CSR ;DISABLE HALT ON BREAK 
16242 110436 004737 134110 JSR PC. INI TMM sSETUP MEMORY MANAGEMENT 
16243 110442 012737 002000 172354 MOV #2000 , KIPAR6 ;START ON 32K BOUNDARY 
186244 110450 005237 177572 INC SRO 3TURN ON MMU 
16245 110454 052737 000002 177746 BIS 2, CCR ISET DIAG. BIT 
oe 110462 013737 000004 001160 MOV aos, $TMPO sSAVE 4 

F 

18248 ;STORE TEST IN THE FIRST 2K AND THEN IN THE SECOND 2k 


16249 ; 





L10 
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SEQ 0335 

TEST - MOVING INVERSIONS TEST FOR DATA RAMS | 

18250 110470 012703 140000 MOV #140000 ,R3 sSTART FOR THE TEST | 

18251 110474 012704 150000 MOV #150000 ,R4 sLOWER BOUNDARY TEST AREA 

186252 110500 012705 157777 MOV @157777,RS5 sHIGH BOUNDARY TEST AREA 

16253 110504 BR 2s 

1 110506 012703 150000 18: MOV #150000 ,R3 ea OF THE TEST 

16255 110512 012704 140000 MOV #140000 ,R4 R BOUNDARY TEST AREA 

16256 110516 012705 147777 MOV #147777, ~ BOUNDARY 

16257 110522 012702 110642 2s: MOV @STMOVI,R SSTART WITH CURRENT 

16258 110526 0103500 MOV R3,RO sMOVE TO UPPER 4K 

16259 110530 0 3%: MOV CR2)+,CRO)+ sWORD BY WORD 

16260 110532 022702 111506 chp @ENDMOV , sALL DONE 

16261 110536 001574 BNE 3% : 

16262 110540 010400 MOV R4,RO sCLEAR CACHE UNDER TEST 

186263 110542 012701 004000 MCV » AI 

18264 110546 4%: CLR (RO)« 

16265 110550 077102 S08 Rl, 

16266 110552 004715 JSR PC.CR3) 3GO DO THE ROUTINE 

16267 110554 005 TST Re sANY ERRORS? 

16268 110556 001411 BEQ S$ sIF NOT, 

16269 110560 010037 111464 MOV RO,RECDAT sDATA RECEIVED 

16270 110564 010237 001122 MOV . $BDADR sADORESS RECIEVED 

186271 110570 042737 140000 001122 BIC #140000 , $BDADR sSTRIP OF PAR BITS 

186272 110576 104043 ERROR +43 : 

16273 110600 000403 BR 6% sEXIT 

16274 110602 022703 150000 S$: chp #150000 ,R3 sDONE FOR BOTH HALVES? 

16275 110606 001337 BNE 1% . 4 NOT, zs AGAIN 

16276 110610 052737 1 177520 6%: BIS #6IT09,BCSR T ON BREAK 

16277 110616 013737 001160 MOV sTMPO, sRESTORE TIMEOUT VECTOR 

16278 110624 012737 177746 MOV #400,CCR sINIT CCR FOR EXIT 

16279 110632 005037 177572 CLR SRO 3; TURN OFF MMU 

ey 110636 000137 111506 JP ENDMOV 3GO TO NEXT TEST 

18262 -OSABL AMA 

16263 110642 052737 000400 177520 STMOVI: SIS @6IT06 , B@BCSR s STANDALONE 

16264 110650 CLR R2 sERROR INDICATOR 

16265 110652 012767 000001 000606 MOV #1, FWOSEQ sINiT UPWARD ADDRESSING INDICATOR 

16266 110660 012767 000001 000602 MOV #1, ADOL SB sINIT LSB AND DO LOOP UNTIL SHIFTED OUT 

16267 110666 042737 100000 172300 BIC #100000 , 8@&K IPDRO sNO BYPASS 

16268 110674 012737 172360 MOV @KDPARO , B04 s ALLOCATE Ls VECTOR 

162869 110 012737 000340 MOV 0340, 806 SAT PRIORITY 

16290 110710 012737 000006 172360 MOV 06, BeKDPARO sPUT RETURN 

16291 110716 052737 100000 172300 6IS 100000 , 8&KIPDRO sBYPASS 

1 110724 7 000546 TSTLUP: CLR sINIT CURRENT DATA 

16293 110730 012767 000021 000534 MOV #21, RITEDA sINIT DATA TO BE WRITTEN 

16294 110736 012767 000021 000530 MOV @21, NEWDAT sINIT EXPECTED DATA 

16295 110744 005767 000516 TST FWOSEG sIF ADDRESSING UPWARD 

16296 110750 001405 BEQ 3 THEN 

16297 110752 010467 000522 MOV R4 ,FSTADO sLET FIRST ADORESS EQUAL LOWEST VALUE 

186296 110756 010567 000520 MOV RS,LSTADO sLET LAST ADDRESS EQUAL HIGHEST VALUE 

16299 110762 BR sELSE 

16300 110764 010567 000510 1%; MOV RS .FSTADO sLET FIRST ADORESS EQUAL HIGHEST VALUE 

16301 110770 010467 000506 MOV R4,LST sLET LAST ADORESS EQUAL LOWEST VALUE 

186302 110774 016767 000500 000502 2%: MOV FSTADD, CURADD sLET CURRENT ADORESS EQUAL FIRSi ADORESS 

16303 111002 000452 CLR oc sINIT LOOP COUNTER 

186304 111006 022767 000010 000444 BGNTLP: CHP #10, OCOUNT 300 LOOP 6 TIMES (4 TIMES TO WRITE 1'S 

16305 111014 001567 BEQ ENDTLP sAND 4 TIMES TO WRITE BACK 0'S) 
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Test 


6309 111016 


170000 
000004 


000374 
000400 


- MOVING INVERSIONS TEST FOR DATA RAMS 


; DON'T REWRITE TIMEOUT VECTOR 


; 
CHECK PATTERNS 


1s: 


2%: 
3%: 


4: 


5$: 


6%: 
7%: 


83398932 


$= 
8 8 


REREEELE EEE hE tt 


SEGRE 


83553 


CURADD, RO 

#170000 ,RO 

o4, RO 

8s 

“5, RO 

6s 

6, RO 

8s 

67, RO 

8s 

NOW 

CURDAT, R1 
»RECDAT 

Tye CURDAT 

EXBAD 

NEWDAT, R1 

63, OCOUNT 

— SCURADO 

RITEDA, 
»RECDAT 

~ pam NEWDAT 

EXBAD 

mee: LSTADO 

> a RITEDA 

o7, OCOUNT 

7$ 

0377, T 


Ba OPE 


sSTORE CURRENT ADORESS 
sLEAVE ONLY LOW 4K BITS 
sTIMOUT VECTOR? 

:IF SO, DON'T REWRITE IT 


sMOVE GOOD DATA TO R1 

sFIRST READ LOCATION 

sIF RECIEVED DATA NOT EQUAL TO EXPECTED 
sDATA THEN 

sEXIT TEST 

sMOVE GOOD DATA TO R1 

3IF LOOP COUNT GREATER THAN 35 


3 THEN 
rCLEAR TEST DATA BY WRITE DATA 


sSET TEST DATA BY WRITE DATA 

300 READ AFTER WRITE 

sIF RECIEVED DATA NOT EQUAL TO EXPECTED 
3;DATA THEN 

sEXIT TEST 

—— ADORESS EQUALS LAST ADDRESS 
3 

3AND IF WRITE PATTERN EQUALS LAST 
sPATTERN THEN 

;AND TEST IS NOT ON LAST LOOP 


; THEN 
sSET UP TO WRITE O'S 


sELSE 

3SET UP FOR NEXT DATA PATTERN 

3;GET A PATTERN 

—. IF DOWNWARD ADDRESSING 

3 

a BE CLEARED BY WRITE DATA 
’ 

;LET NEWDAT BE SET BY WRITE DATA 
sUPDATE LOOP COUNTER 

— FIRST ADORESS FOR THIS PASS 
= apart UPWARD 

sCALCULATE NEXT HIGHER 


ADORE SS 
sIF CURRENT ADORESS HAS BEEN INCREASED 
s;ABOVE HIGHEST ADDRESS THEN 


COKDACO 
TEST - 


KDJ11-B8 CLUSTER DIAG. 
MOVING INVERSIONS TEST FOR DATA RAMS 


111340 162767 007777 000136 SUB 
111346 000411 BR 
111350 166767 000114 000126 9%: SUB 
4111356 020467 000122 CMP 
111362 0034035 BLE 
111364 062767 007777 000112 ADO 
111372 10%: BR 
1113574 005767 000066 ENDTLP: TST 
111400 001404 BEQ 
111402 7 CLR 
111406 000167 177312 JP 
111412 012767 000001 000046 1%: MOV 
111420 006167 000044 ROL 
111424 022767 020000 000036 ENDLUP: CHP 
111432 001406 BEQ 
111434 000167 177264 JP 
111440 016700 EXBAD: MOV 
111444 016702 000034 MOV 
111450 042737 000400 177520 EXITST: BIC 
111456 000207 RTS 
-ENABL AMA 
111460 000000 OCOUNT: .WORD 
111462 000000 EXPDAT: .WORD 
111464 000000 RECDAT: .WORD 
111466 000000 FWOSEQ: .WORD 
111470 000000 ADOLSB: .WORD 
111472 000000 RITEDA: .WORD 
111474 000000 NEWDAT: .WORD 
111476 000000 CURDAT: .WORD 
111500 000000 FSTADD: .WORD 
111502 000000 LSTADO: .WORD 
111504 000000 ADO: .WORD 
111506 ENDMOV : 


MACRO M1200 16-OCT-84 16:36 


07777, 
10% 


ocooooooooocoe 


ADOLSB, CURADD 
R4,CURADD 


CURADD 


FWOSEQ 


SEQ 0337 


sROLL ADDRESS BACK 
ELSE 


8 
sCALCULATE NEXT LOWER ADDRESS 

$ CURRENT ADORESS HAS BEEN DECREASED 
sBELOW LOWEST ADDRESS THEN 

3 ADDRESS BACK 

;ENDOO 

ee UPWARD FINISHED 

8 

300 ADDRESSING DOWNWARD 

sSET ADDRESSING UPWARD INDICATOR 
sUPDATE LSB TO NEXT POSITION 
sALL DONE? 

:ENDDO 


sSTORE RECEIVED DATA 
sSTORE ADDRESS 
;0UT OF STANDALONE 


sSTORES EXPECTED (GOOD) DATA FOR COMPARISONS 
VERIFIED 


T OF ADORESSING 
sSTORES LEAST SIGNIFICANT BIT FOR RAM TESTS 
sSTORES WRITE DATA FOR RAM TESTS 
sDATA STORE FOR RAM TESTS 


ADORESSING SEQUENCE 
sSTORES LAST ADDRESS IN ADDRESSING SEQUENCE 
;STORES CURRENT ADDRESS FOR RAM TESTS 


Bil 
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TEST 


- MOVING INVERSIONS TEST FOR TAG STORE 


-SOTTL TEST ~- MOVING INVERSIONS TEST FOR TAG STORE 


sMOVING INVERSIONS TEST - THE TEST IS STARTED AFTER LOADING THE RAM STORE 
sWITH O'S. EACH ADDRESS IS READ AMD VERIFIED TO BE ALL O'S. THEN A 1 IS 
sSUBSTITUTED IN A Bl! POSITION AND THE NEW WORD IS WRITTEN. NEXT THE ADDRESS 
sIS READ TO VERIFY S. THIS IS REPEATED FOR EACH BIT OF 

THE WITH 1'S. THE WHOLE PROCESS iS REPEATED PLUGGING 
sIN O'S TO THE 1°S AM REPEATED TWICE HORE ADORESS IN THE DOMAAD DIRECTION 
sFINALLY EVERY 1s TED FOR GIT POSITION BEING THE LSB. TO SAVE 


SINCE 8E 0 

sO0NE BY DOING MEMORY CYCLES TO THE CORRECT BUS ADDRESSES. 19 00 THIS THE 
sTEST WILL BE DONE WITH THE DIAGNOSTIC BIT IN THE CCR (BIT 1) SET TO A1. 
sTHIS TEST RUNS IN STANDALONE MODE. 

; 


’ 
ne ee 

sSETUP AND ENABLE MU 

sSETUP CCR TO ABORT PARITY ERRORS 

ot IN STANDALONE MODE FOR EACH HALF SEPARATELY 


THEN 
LET FSTADD EQUAL FIRST ADDRESS OF 4K BYTE BUFFER 
LET LASTAD EQUAL LAST ADDRESS OF 4x SYTE SF FER 


LET FSTADD EQUAL LAST ADDRESS OF 4K BYTE BUFFER 
bor LET LASTAD EQUAL FIRST ADDRESS OF 4K BYTE BUFFER 
LET OCOUNT = 
00 UNTIL TL DCOUNT EQ 010 
CURADD 


READ USING CURDAT AS PAR 
IF MISS THEN 

° ERROR 

ENDIF 

WRITE CURADD USING NEWDAT AS PAR 
ENDIF 

IF HIT THEN 

ENDIF 

READ CURADD USING NEWDAT AS PAR 
IF MISS THEN 


ENDIF 
<i CURADD £@ LASTAD THEN 
LET CURDAT = “_e~~ 
IF OCOUNT < @1 THE 
LET NEWAT. * NEWDAT SETBY RITEDA ROTATED LEFT 


ENDIF 

IF OCOUNT > @1 THEN 

bos LET NEWDAT = NEWDAT CLR BY RITEDA ROTATED LEFT 
L 


LET NEWDAT = #155400 (NO ALL 1'S) 
LET RITEDA = #22200 


SEQ 0338 


C11 
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005737 003032 


012703 140000 
130000 

012705 137776 

000406 

012703 150000 
120000 

012705 127776 
002000 

012702 111450 


067402 


177320 


172516 
177746 
001160 


172354 


- MOVING INVERSIONS TEST FOR TAG STORE 


t. 
a ‘. 

t. ELSE 

%. . 

E 

iy 

t. 

3. . 

Se ELSE 
3. 2 

“= 

3. o 

8. . 

Se 7 ENDIF 
3. ENDIF 

Ss ENDOO 

bs IF FWOSEG EQ 61 Lae 
Ss LET FWOSEQ = 
i. ELSE 

Ss . ROTATE ADOLSS 
bi ‘ LET FWOSEQ = #1 
3. ENDIF 


;ENDOO 
TRE STORE PARITY ABORT VECTOR 
sENDTST 


ENDIF 
INCREMENT OCOUNT 
<< ngenage @1 THEN 


T CURADD = 


ENDIF 


LET CURADD = CURADD - ~_~4 

IF soap “ LOW ADDRESS THE 

T CURADD = CURADD = - 07776 
ENDIF 


CURADO + — 
IF CURAOD GE HIGH ADORE SS THEN 
CURADD = CURADD + #7776 


8 § SSOOHHSSSSSSSSSSSSSSSSSSESSSHSHESHSSSSHSSSSEHSSSSSSSHSHSSEHHHEESES 


TST27: 
ROP 
TST CCHPAS 
Ree GOS 
woe 
SP ENDTAG 
99%: wOP 
BIT @BITO6 , SSUR 
BE 1008 
sP TAG 
100%: BIC #1000 ,BCSR 
JSR ‘ THM 
Inc 
MOV @BIT04 ,PORS 
BIS 2, 
oe4, sTMPO 
3 
MOV #140000 ,R3S 
OV #130000 ,R4 
MOV @137776,R5 
6R es 
1$: MOv psoas ty RS 
MOV m4 
MOV 0127776. RS 
2%: MOV #2000, KIPARG 
MOV @EXITST,R2 
MOV R3,RO 


sMAVE DONE ENOUGH INCLUSIVE PASSES? 


3 NOT YET 
3; OEBUG AID 
3: YES SKIP THIS 


sRUN THIS TEST? 
sIF SET, GO 00 IT 


THERWISE, GO TO NEXT TEST 


10 
:DISABLE HALT ON BREAK 
sSETUP MEMORY MANAGEMENT 


3 TURN ON PU 

sENABLE 22-BIT MAPPING 
sSET DIAG. BIT 

sSTORE TIMEOUT VECTOR 
5 

sSTORE TEST IN THE FIRST 2K AND THEN IN THE SECOND 2k 


sSTART FOR THE TEST 


Y TEST AREA 


sLOWER BOUNDAR 
iHIGH BOUNDARY TEST AREA 
sSTART OF THE TEST 


sLOWER 


BOUNDARY TEST AREA 


sHIGH BOUNDARY 


sABOVE 32K 
sSTART WITH CURRENT 
MOVE TO UPPER 4K 


SEQ 0339 


ee ee Se ee 


Bae, 
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SEQ 0340 
TEST - MOVING INVERSIONS TEST FOR TAG STORE 
18513 111652 012220 3%: MOV CR2)+,(RO)> sWORD BY WORD 
16514 111654 022702 112650 cop @ENDTAG ,R2 sALL DONE? 
16515 111660 001374 BNE 3% 4 
18516 111662 012700 111764 MOV @STMOVT ,RO sADORESS OF ROUTINE 
16517 111666 162700 111450 SUB @EXITST,RO sPROPER OF SET 
16518 111672 050003 BIS RO,RS : 
16519 111674 004715 JSR PC,CRS) sGO DO THE ROUTINE 
16520 111676 005700 TST RO sANY ERRORS? 
16521 111700 001407 BEQ ag s CONTINUE 
18522 111702 010037 001122 MOV RO, SBOADR sSTORE FAILED ADDRESS 
16523 111706 042737 160000 001122 BIC #160000 , §BDADR sCLEAR PAR 
16524 111714 104050 ERROR +50 
16525 111716 000403 BR S$ sEXIT TEST 
18526 111720 022703 150000 4%: CMP #150000 ,R3 sDONE FOR BOTH HALVES? 
16527 111724 103736 BLO 1$ sIF NOT, OO AGA 
16526 111726 013737 001160 000004 5%: MOV STHPO, 904 sRESTORE TIMEOUT VECTOR 
16529 111734 012737 000400 177746 MOV #400, CCR sINIT CCR FOR EXIT 
16530 111742 005037 177572 CLR SRO sTURN OFF MMU 
16531 111746 005037 172516 CLR PRS 5 
186532 111752 052737 001000 177520 BIS #1000 ,BCSR sENABLE HALT ON BREAK 
petty 111760 000137 112630 JP ENDTAG sEXIT TEST 
18535 -OSABL AMA 
16536 111764 052737 000400 177520 STMOVT: BIS @81T06 , B9BCSR sSTANDALONE MODE 
16537 111772 042737 100000 172312 BIC $8IT15, SeKIPORS sNO BYPASS 
16538 112000 042737 100000 172300 BIC 100000 , B@KIPDRO sNO BYPASS 
18539 112006 012737 172360 000004 MOV @KDP ARO , 864 mare TIMEOUT VECTOR 
186540 112014 012737 000340 000006 MOV 0340, 806 AT 7 
16541 112022 012737 O000N06 172360 MOV 6, BeKDP ARO ;PuT RE TURN 
18342 112030 052737 100000 172300 BIS 100000 , B@KIPDRO sBYPASS 
186343 112036 005037 172352 CLR BEKIPARS i 
sb5a4 010400 MOV R4,RO sCLEAR CACHE UNDER TEST 
18545 112044 012701 004000 #4000, R1 H 
16546 112050 005020 at: CLR CRO )+ $ 
183547 112052 077102 SOB Rl, as 2 
16548 112054 005000 CLR RO sCLEAR ERROR FLAG 
16349 112056 012767 000001 177402 MOV #1, FWOSEQ sSET UPWARD ADDRESSING INDICATOR 
186550 112064 012767 000002 177376 MOV #2, ADT i.SB sINITIALIZE LEAST SIGNIFIGANT BIT 
18551 112072 005067 177400 TSLOOP: CLR CURDAT s0LD DATA 
16552 112076 012767 022200 177370 MOV @22200 , NEWDAT sSET ADORESS BITS 
16553 112104 012767 022200 177360 MOV #22200, ,RITEDA sSET ADORESS BITS 
16554 112112 005767 177350 TST FWOSEQ < 4 ADORESSING UPWARD 
16555 112116 001405 BEQ 1% 
010467 177354 MOV R4, FSTADO ? IRST ADORESS WILL BE LOWEST ADDRESS 
18557 112124 010567 177352 RS, LSTADD sAND LAST ADORESS WILL BE HIGHEST 
16556 112130 900404 BR 2s sELSE 
16559 112132 010567 177342 18: MOV RS, FSTADO sFIRST ADORESS WILL BE HIGHEST ADDRESS 
16560 112136 010467 177340 MOV R4, LSTADO sAND LAST ADORESS WILL BE LOWEST 
1863561 112142 005067 177312 2s: CLR DOCOUNT sINITIALIZE LOOP COUNTER 
pom 112146 616767 177326 177330 MOV FSTADO, CURADO 
$ 
rise s DON'T REWRITE TIMEOUT VECTOR | 
3 
16566 1121°% 016700 177324 36: MOV CURADO, RO sSTORE CURRENT ADORESS 
16567 112160 042700 170000 BIC #170000 ,RO sLEAVE ONLY LOW 4K BITS 
16568 112164 022700 000004 CMP 04, RO sTIMOUT VE ? 


CTOR 
16569 112170 001526 BEQ 16% sIF SO, DON'T REWRITE IT 





Ell 
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TEST 


- MOVING INVERSIONS TEST FOR TAG 


177272 
177272 
177752 
000004 


izi7e 001523 
172352 


177244 
177236 


000346 
1772354 
177236 
177752 
000004 


172352 


177210 
177202 
000010 177172 
000167 000302 
177200 
177752. «177152 
000004 177144 


000254 
177150 
177132 
000001 


177150 
177132 
177106 
177106 
177062 


177064 


155400 177060 


177050 
177044 


177022 
177036 


177014 


177010 
177016 


007776 


176764 
176772 


007776 
000005 


177044 


177040 


177022 


177006 
176776 
176762 
176730 


177416 
176724 


176716 


STORE 


S$: 


6%: 


8s: 
108: 


9%: 
118: 


128: 


13%: 


14%: 


15%: 


16%: 


17%: 


18%: 


161%: 


Sere eom ee DRIGLS SA AE Some ae meeM Sem 


6, RO 
16% 
CURDAT, 
@CURADD 
SeHITMIS, oy 
— RECDAT 
EXBAD2 
NEWDAT, 
@SCURADD 
@eHITMIS ,RECDAT 
baat RECDAT 
— RECDAT 
EXBAD2 


@CURADD 
GeHITMIS ,RECDAT 
— RECDAT 


BOK IPARS 


BOK IPARS 


30R PRIORITY 


’ 
sGET OLD PATTERN 
s0LD DATA OK? 


4 4 ACCESS WAS A MISS 


+ ERROR, Ex or. 
sGET NEW PAT 
sREGISTER pile WRITE LOCATION 


sIF ACCESS WAS A HIT 
3 THEN 


iMISS? 
sIF SO, CONTINUE 


sERROR 

sREGISTER AND READ LOCATION 
sIF ACCESS WAS A MISS 

THEN 


F 
sERROR, EXIT 
+4 CURRENT ADORESS IS LAST ADORESS 


iNEW KIPARS 
sIF LOOP COUNTER LESS THAN 1 


THEN 

sUPDATE OF NEW DATA.. 
iBY SETTING BITS 
sENDIF 


| CHANGE PATTERN? 

3IF SO, BRANCH 
sSTART WITH THE SAME 
3sD0N‘'T DO ALL 1'S 
sUPDATE OF NEW DATA.. 
1BY CLEARING BITS 
sELSE 


s INCREMENT THE LOOP COUNTER 
sFINISH FIRST CURRENT ADDRESS 


sEL 
sIF ADORESSING UPWARD 


3 THEN 

> THE VALUE OF THE CURRENT LSB 
ADORESS antes THAN HIGHEST 

i VIRTUAL ADORESS THE 

sROLL IT BACK 


sELSE 

sIF ADORESSING DOWNWARD THEN SUBTRACT LSB 
sIF CURRENT ADDRESS LESS THEN LOWEST 
sVIRTUAL ADORESS THEN 

;ROLL IT BACK 

sIF LOOP COUNTER LESS T 

3 THEN LOOP BACK FOR next ® Bry POSITION 


aces UPWARD 
3 
sSTART ADDRESSING DOWNWARD 
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177316 
000001 
176702 
020000 


177270 


Los rie 
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INVERSIONS TEST FOR TAC STORE 


176704 19%: 
176674 


EXBAD2: 
172352 TSEND: 
177520 


883323233 


Do 
—- 
“non 


ENDTAG: 
-ENABL AMA 


@BITOS, BeBCSR 
PC 


sELSE 
sSTART ADDRESSING UPWARD 
sROTATE = TO NEXT POSITION 


sAND ADDRESS 

sRESTORE PAR 

2OUT OF STANDALONE MODE 
sRETURN 


KDJ11-8 CLUSTER DIAG. 
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. SBTTL 


TEST 
6c 


- PCR READ/WRITE BITS 
SR READ/WRITE BITS 


a a ae ee eee 


Gil 


sPCR AND 

1 THE FIRST TEST WILL CHECK THAT PCR REGISTER IS BOTH WORD AND 
sBYTE ADDRESSABLE. BITS 14-09 AND 06-01 WILL BE WRITTEN AND READ 
sAS ZEROES AND ONES. THE REST OF THE BITS HAVE TO BE ALL O'S. 


sROUTINE TEST 
SAVE 


PCR 
LET PCR=0 
a FOR PATTERN=001111,110011, TT aaa -010101 


ENDDO 
WRITE PCR=0101010101010101 
IF PCR NE 0101010001010100 THEN 


WRITE PCR<14-09>=PAT 
WRITE PCR<06-01>=PATTERN 


IF PCR<14-09> NE PATTERN OR PCR<06-01> NE PREVIOUS 
PATTERN 


ENDIF 


THEN ERROR 
WRITE PCR<06-01>=PATTERN 


IF PCR<14-09> NE PATTERN OR PCR<06-01> NE PATTERN 
THEN ERROR 


ENDIF 


§ s POSSESSES ESEESESESESSESESESESESEEESESESEEESEEESEESEOSESEEEEEES 
TST3O: SC 


ENDIF 

ENDROUT INE 
CLR PCR 
MOV @SIXBIT+1,R2 
MOV @SIXBIT,R4 
MOV 64,R3 

3; WRITE TO HIGH BYTE FIRST 

3 

18: MOvB CR2),PCRe1 
ChPB (R2),PCRe1 
BNE ra) 
CMPB (R4),PCR 
BEQ 3% 

2s: MOVB (R2), $GDDAT +1 
MOvVB (R4), $GDODAT 
ERROR +51 

3%: TSTB (R46 

o 

3: WRITE TO LOW BYTE 

$ 
MOvB (R2),PCR 
CMPB ). 
BNE 
CMPB (R2),PCR 
BEQ 5% 

4s; Move (R2), $GDDAT 
Move (R2), $GDDAT 
ERROR +51 

5%: TSTB8 (R2)+ 
S08 R3,18 


sINITIALIZE PCR TO O 
sR2->TABLE OF PATTERNS FOR 6 R/W BITS IN EAC 


3R3 POINTER TO PREVIOUS PATTERN 
300 4 TIMES 


sWRITE TO HIGH BYTE 
sBYTE WRITTEN OK? 
sIF NOT, BRANCH 

1 BYTE CHANGED? 

4 ° 

3;EXPECTED PATTERN HIGH BYTE 
3LOW BYTE 

sERROR PCR READ/WRITE BITS 
s INCREMENT POINTER FOR OLD 


sWRITE TO LOW BYTE 

;BYTE WRITTEN OK? 

:IF NOT, BRANCH 

3 HIGH BYTE CHANGED? 

3sIF NOT, BR 

sEXPECTED PATTERN HIGH BYTE 

sLOW BYTE 

sERROR PCR READ/WRITE BITS 

s INCREMENT POINTER FOR NEW PATTERN 
300 FOR ALL 4 PATTERNS 
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186701 112744 012737 
18702 112752 022737 
001404 


16704 112762 112737 
16705 112770 104051 


112772 000403 


18706 112774 000 
112777 124 


052525 
052124 
052124 


aT 
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; 
: NOW TRY WORD ADDRESSING 


; 
177522 MOV #52525 ,,.PCR sWRITE A PATERN 
177S22 CMP #52124 ,PCR sALL BUT BITS <8,7,0> OK? 
BEQ 6% sIF SO, BRANCH 
001124 MOVE #52124, $GDDAT sEXPECTED PATTERN 
ERROR +51 sERROR PCR READ/WRITE BITS 


BR TST31 33GO TO NEXT TEST 
146 SIXBIT: .BYTE 0,36,146,124,52 3001111,110011,101010,010101 


sBINARY DIVIDE FOR 6 BITS 
-EVEN 


113112 


001401 
04052 
077221 


012737 
032737 
001403 
005037 


177520 002730 


177520 


“Zan 
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.SBTTL TEST - BCSR READ/WRITE BITS 
3 THE SECOND TEST WILL CHECK THAT BCSR<7-5;2-0> CAN BE WRITTEN AND 
sREAD AS ZEROES AND ONES. ®BCSR<14,03> SHOULD BE 00'S. BCSR<04> 
;SHOULD BE CLEARED BY RESET INSTRUCT ION. 
; ROUTINE TEST 
“ rage PATTERN*011,010,101 DO 

WRITE acsR<7- 5>=PATTERN 

IF BCSR<7-5> NE PATTERN THEN 

. ERROR 

ENDIF 

WRITE BCSR<2-0>=PATTERN 

IF BCSR<2-0> NE PATTERN THEN 

ERROR 


ENDIF 
ENDDO 
IF BCSR<14,03> NE <0,0> THEN 
° ERROR 


ENDIF 

LET BCSR<04>=1 

IF BCSR<04> NE @1 THEN 
. ERROR 


ENDIF 

EXECUTE “RESET” 

IF BCSR<04> NE O THEN 
‘ ERROR 


ENDIF 
LET BCSR<04>*0 (THIS BIT IS WRITE ENABLE FOR EAROM) 


: 
; 
; 
; 
; 
; 
; 
; 
; 
; 
i. 
3. 
; 
; 
; 
; 
: 
; 
; 
H 
3. 
3. 
s ENDROUT INE 


3S SSSSSSSESSSSSSSSSSSSSASSSHSSSESSESSSESSEESSESHESSSESESHELEEESESEEESESE 


a cr mn cr a a + ee ees 


— | 


SEQ 0345 


TST31: SCOPE 
MOV BCSR , SAVBR sSAVE BCSR 
CLR BCSR sCLEAR BCSR 
3 
; WRITE TO BITS <7-5> AND <2-0> 
3 
@THRBIT RS sPOINTER FOR PATTERN TABLE 
CLR $GDDAT sCLEAR A LOCATION 
MOV #3 ,R2 FOR ALL PATT 
18: MOVE (R3),BCSR sWRITE TO BITS <7-S> 
MOVB (R3), $GODAT sEXPECTED PATTERN 
CMPB (R3)+,BCSR :BITS WRITTEN OK? 
BEQ 2s sIF SO, BRANCH 
ERROR re sERROR IN BCSR READ/WRITE BITS 
2s: Move (R3),BCSR {WRITE TO BITS <2-0> 
MOVB (R3), $GODAT sEXPECTED PA. TERN FOR ERRORS 
CMPB (R3)+,BCSR sBITS WRITTEN OK? 
BEQ 38 sIF SO, BRANCH 
ERROR +52 sERROR IN BCSR READ/WRITE BITS 
34: SOB R2,18 ;CONTINUE TILL ALL PATTERNS DONE 


; CHECK UNUSED BITS <3> 


MOV #10,BCSR 
BIT eeITOs, BCSR 


CLR $GDDAT 


sWRITE TO tt <3> 
sALL ZEROES? 

IF YES, BRANCH 
sEXPECTED PATTERN 





Jil 
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TEST - BCSR READ/WRITE BITS 


de 44 113116 104052 ERROR +52 sERROR IN BCSR READ/WRITE BITS 

18 3 

186771 3; CHECK THAT BIT <4> CLEARS BY RESET 

186772 3 

18773 113120 052737 000020 177520 4%: BIS #8IT04 ,BCSR 3SET BIT 4 

18774 113126 032737 000020 177520 BIT #6IT04 ,.BCSR sWRITTEN OK? 

18775 113134 001005 BNE S$ sIF SO BRANCH 

18776 1123136 012737 000020 001124 MOV #B8IT04 , $GDDAT sEXPECTED PATTERN 

186777 113144 104052 ERROR +52 sERROR IN BCSR READ/WRITE BITS 

16778 113146 000415 BR 7$ sEXIT TEST 

18779 113150 042737 000020 177520 5%: BIC #81 T04 ,.BCSR sTRY TO CLEAR BIT 4 

18780 113156 032737 000020 177520 BIT #81IT04 ,.BCSR 7 OK? 

16781 113164 001403 BEQ 6% sIF SO BRANCH 

18762 113166 005037 001124 CLR $GDDAT sEXPECTED PATTERN 

16763 113172 1 ERROR +52 sERROR IN BCSR READ/WRITE BITS 

186764 113174 005737 001206 6%: TST $PASS sFIRST PASS? 

16785 11 001014 BNE $ sIF NOT FIRST PASS,EXIT 

16786 113202 052737 000020 177520 7%: BIS #8IT04 ,BCSR sSET BIT 4 AGAIN 

18787 113210 RESET sEXECUTE RESET 

186788 113212 032737 000020 177520 BIT #81T04,BCSR s8IT 4 CLEARED? 

18789 113220 001404 BEQ sIF YES, BRANCH 

18790 113222 104053 E ;RESET DOESN'T CLEAR BCSR<4> 

16791 113224 042737 177520 BIC #8IT04 ,BCSR ;CLEAR BIT 4 

186792 113232 013737 002730 177520 8%: MOV SAVBR ,.BC sRESTORE BCSR 

cores 113240 BR TST32 ::;GO TO NEXT TEST 

18795 113242 140 003 100 THRBIT: .BYTE 140,3,100,2,240,5 3011,010,101 FOR BITS <7-5,2-0> 
113245 002 240 005 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 
- 16 BIT ROM CHECKSUM TEST 


TEST 


188652 113334 
188653 113336 


K14 


PAGE 30 


-S8TTL TEST - 16 BIT ROM CHECKSUM TEST 
sROM'S CHECKSUMS 


; 
316 BIT ROM TEST 
sTHE FIRST TEST WILL CLEAR BCSR<07>, LOAD PCR<14-09> WITH 
sROM ADDRESS BITS <14-09>, AND CHECK CHECKSUMS OF 16-6IT ROM 
sBY ACCESSING IT THRU BUS ADDRESSES 173000-173776. WITH 
sBCSR<06;05> BOTH CLEAR, PCR<06-01> USED AS ADDRESS BITS 14-09, 
THE SAME THING WILL BE DONE BY ADORESSING 16-BIT ROM THRU BUS 
+ 165000- 165776. THE RESULTS SHOULD BE THE SAME AND SHOULD COMP 
sWITH THAT STORED IN THE BOOT AND DIAGNOSTIC ROM. 


; 

sB8CSR = <07> DISABLE 17773000 

; <06> DISABLE 17765000 

; <05> ROM SOCKET 3 AT 17765000 


}ROUTINE T EST 
. LET BCSR<7,6,5>*0,0,0 
DO FOR Ri FROM #0 TO #31. BY #1 DO 
° LET PCR<14-09>=R1 
DO FOR R2 FROM @0 TO #776 BY ? 


3 
3 
3 
8 
3 
3 . CALCULATE CHECKSUM THRU 173000 
3 ‘ ENDDO 

3. ENDDO 

be IF CHECKSUM NE #0 THEN 

hs . ERROR 

Be ENDIF 

3 veadininaatag hg Re Me Fae * BY #1 

3 LET PCR<06-01>=R1 

3 DO FOR R2 FROM #0 TO #776 BY 2 

8 CALCULATE CHECKSUM THRU 165000 
3 

3 ENDDO 

3 IF CHECKSUM NE #0 THEN 

3 ‘ ERROR 

3 ENDIF 

INE 


PL SCAMS SCHAGHEKSHKSHESSHESESLSSESSEREHARASHSEHKE RSH SEHEHSHALRSHESSSH TAH 


TST32: SCOPE 


MOV BCSR , SAVBR sSAVE BCSR 
BIC #61T07!BITO6!BITOS,BCSR sREAD 16 BIT ROM 
BIS #1000,BCSR s ENABLE HOB, FOR APT 


$ 
3 CALCULATE LOW BYTE CHECKSUM'S THRU 173000 AND 165000 
; 


SEQ 0347 


CLR Ri sPAGE COUNT FOR ALL 8K 
CLR PCR sCLEAR PAGE CONTROL REGISTER 
18: CLR ACTCHS sCLEAR CHECKSUM AT 173000 
CLR $TMPO sAT 165000 
CLR Re ;CLEAR COUNTER THRU A PAGE 
2s: MOV 173000(R2),R3 sGET LOW BYTE THRU 1735000 
MOV 165000(R2),R4 s+ THRU 165000 
ADO R3,ACT sCALCULATE CHECKSUM THRU 173000 
ADO R4, $TMPO ak CHEKCSUM THRU 165000 
TST (R2)+ sGET NEXT 
CMP #776 ,R2 s WORD BEFORE L LAST? 
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TEST - 


0050 
042737 
013737 


177S22 


001000 
002724 


000176 


173774 177522 


000002 
177522 
177523 
000200 


002724 


001160 


177522 
001000 177520 
177520 002730 


3%: 


4$: 


S$: 


F 
: CHECK 
F 
LASTCH: 


1%: 
2s: 


4$: 


5%: 


3$ 
CMP R3,PCR 
BEQ 34 
ERROR +54 
Crp #1000 ,R2 
BGT $ 
TST ACTCHS 
BEQ 4$ 

+54 
TST $TMPO 
BEQ 5$ 
ERROR 654 
ADD #2,R1 
MOVB R1,PCR 
MOVB R1,PCRe1 
CMP #160,R1 
BGT 1% 
THE LAST 2K OF ASCII TEXT 
CLR ACTCHS 
CLR $TMPO 
CLR R2 
MOV 173000(R2),.R3 
MOV 165000(R2), 
ADO R3,ACTCHS 
ADO R4,% 
TST (R2)¢ 
CMP #1000 ,R2 
BGT 2s 
CMP #176,R1 
BNE 4 
CMP 173774 ,PCR 
BEQ 4 
ERROR +54 
ADO o2,R1 
MOvVB R1,PCR 
MOvB R1,PCRe1 
CMP #200 ,R1 
BGT 1$ 
TST ACTCHS 
BEQ 5% 
ERROR 054 
TST sTMPO 
BEQ 6% 
ERROR +54 
CLR PCR 
BIC #1000, BCSR 
MOV BCSR , SAVBR 


Lil 


sIF NOT, BRANCH 

sPAGE NUMBER STORED 0K? 
sIF YES, BRANCH 
sPAGE NUMBER STORED WRONG 
sLAST WORD IN A PAGE? 

sIF NOT, BRANCH 


S, BRANCH 
sIN CHECKSUM AT 173000 
sCHECKSUM 0 AT 1650007 


sIF YES, BRANCH 
sIN CHECKSUM AT 165000 
sGET NEW PAGE 


sSTORE IN PCR<6-1> 

STORE IN PCR<14-9> 

sALL PAGES IN R2 FROM BIT1? 
sIF NOT BRANCH 


sCLEAR CHECKSUM AT 173000 


sAT 165000 

sCLEAR COUNTER THRU A PAGE 

1GET LOW BYTE THRU 173000 
sTHRU 165000 

sCALCULATE CHECKSUM THRU 173000 
sCALCULATE CHEKCSUM THRU 165000 


sSTORE IN PCR<14-9> 


3IN CHECKSUM AT 173000 
3sCHECKSUM O AT 165000? 
3IF YES, BRANCH 

IN CHE 


PCR 
3 RESET HOB FOR APT 
sRESTORE BCSR 


SEQ 0348 


—4 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 16-OCT-84 16:38 


Mil 


PAGE 31 


SEQ 0349 


TEST - 8 BIT EEROM CHECKSUM (10SDEC BYTES) TEST 
18907 .SBTTL TEST - 6 BIT EEROM CHECKSUM (10S5DEC BYTES) TEST 
18908 ;THIS TEST WILt CLEAR BCSR<6>, SET BCSA<S>, LOAD PCR<5S-1> 
18909 sWITM ADORESS BITS 13-09, AND CHECK CRC PATTERNS OF 6-BIT EEROM BY 
186910 sACCESSING IT THRU ADDRESSES 165000-165776. THIS TEST VERIFIES THE 
16911 sRE ONLY OF THE AREA. 
18912 sROUTINE TEST 
18913 Se LET BCSR<5>=1 
16914 . LET OLOCRC-:60 
18915 3 LET PCR<05-01>-60 
16916 . CALCULATE CHECKSUM FOR THE FIRST 320 LOCATIONS 
16917 $. IF RESULTING CHECKSUM NOT ZERO THEN 
16918 . . ERVOR 
16919 $. ENDIF 
eee 3s ENDROUI TNE 
1 
18922 FY {SOSCHESKEAKSOSSASSSSHMSSS ASGSKLSSSSSSOSSTSHHSSHSHESSHKEHRASEHSeSEOSESHDAE 
113570 3: SCOPE 
16923 113572 013737 177520 002730 MOV ECSR , SAVBR sSAVE BCSR 
18924 113600 042737 000100 177520 BIC @6IT06 .BCSR sENMABLE INTERNAL RESPONSE 
186925 113606 052737 000040 177529 BIS @6IT05S.BCSR sSELECT 8-BIT ROM 
oer 113614 005037 001160 CLR ;CLEAR SUM 
3 
teed ; CALCULATE LOW BYTE CHECKSUM'S THRU 165000 
3 
16930 113620 005001 1%: CLR R1 sPAGE COUNT FOR ALL 8K 
16931 113622 005037 177522 CLR 3 PRE ISTER 
113626 005037 002724 2s: CLR ACTCHS sCLEAR CHECKSUM AT 165000 
113632 005002 CLR Re A PAGE 
16934 113634 116204 165000 3%: MOVB 165000( R2) ,R4 3;GET A BYTE THRU 165000 
16935 113680 060437 001160 ADD R4, STHPO sCALCULATE CSUM THRU 165000 
16936 113644 005722 TST (R2)+ ;GET NEXT WORD 
186937 113646 022702 000316 CMP #316 ,R2 ;WORD BEFORE LAST? 
16938 11 001004 BNE &% ;IF NOT, BRANCH 
16939 113654 122704 000252 CMPB 0252 ,.R4 3314 SHOULD HAVE 252 
186940 113660 001765 BEQ 3% IF YES, BRANCH 
16941 113662 104055 55 sPAGE NUMBER STORED WRONG 
16942 113664 022702 000322 4s CMP @322 ,R2 sLAST WORD IN A PAGE? 
19943 113670 003361 BGT 38 3IF NOT, BRANCH 
16944 113672 113737 165010 001162 165010, $TMP1 sSTORE SIZE,<3>=*1 2K 
16945 113700 105737 001160 TSsTB sTMPO sCHECKSUM O AT 165000? 
16946 113704 001401 BEQ 5% 3IF YES. BRANCH 
16947 113706 104055 ERROR +55 3IN CHECKSUM AT 165000 
186946 113710 005037 177522 5%: CLR PCR 
18949 113714 013737 002730 177520 MOV SAVBR .BCSR sRESTORE BCSR 


eee eee aS... 
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TEST - 6-BIT EAROM READ-WRITE - TEST 


16952 .SBTTL TEST - 8-BIT EAROM READ-WRITE - TEST 
1869535 
18954 ; THIS TEST WRITES A CHECKERBOARD PATTERN OF ALTERNATING 1'S AND 0’S IN 
186955 ; 8-BIT EAROM. 
18956 ; ALL BASE AREA 316 OCTAL LOCATIONS ARE SAVED. (105 DEC PLUS 4 CUSTOMER LOC.) 
18957 ; IT WILL RUN ONLY IF BIT 12 IS SET IN SOFTWARE SWITCH REGISTER. 
18958 3: THIS IS TEST ° T AT RUNTIME BY AN OPERATOR. LOOP 
16959 ; ON ERROR I ITED, AS IT WOULD IBLE TO 
18960 ; IN A RELATIVLY SHORT TIME WITH REPEATED WRITE CYCLES. THE OPTION TO 
16961 3; CONTINUE BEYOND A SINGLE ERROR IS SELECTED BY BY ASSER THE HALT ON 
ete | 3 ERROR SWITCH AT WHICH TIME THE OPERATOR MAY TRUNCATE THE TEST. 
18696 8 
18964 3 THE SWITCHES WHICH COULD AFFECT THE EEROM’S LIFE ARE MASKED OUT AND 
16965 3; RESTORED IN THE TEST IMMEDIATLY FOLLOWING THIS ONE. <<<<<esessess 
18966 8 
186967 ; THIS TEST WILL BE NOT BE DONE IF THERE IS AN APT SYSTEM PRESENT, OR I 
18968 0 ee et iti Plated (ah ie tae ae SET. IF BIT 12 iS SET AND 
18969 ; THERE IS NO APT SYSTEM PRESENT (OR IN LOAD MODE), THE EEROM TEST “a BE 
rte ; RUN 1 TIME, ALL SUBSEQUENT PASSES WILL NOT INCLUDE THE EEROM TEST 
8 
18972 8 
16973 3 -- SECTION 1 
18974 3¢ SAVE BASE AREA 
16975 3° 
18976 3° 
16977 3¢ 
16978 3¢ TEST -- SECTION 2 
18979 :¢ 
18980 3¢ 2K PROCEDURE 
18961 ;¢ OO WHILE NOTSDONE$2000 
18982 3° WRITE 10101010 (252 OCT) 
189863 7° DELAY 
18984 3° READ 10101010 (252 OCT) 
18965 3° UPDATE ERROR LIST IF INCORRECT READ 
18986 ;¢ ENDOO 
186967 3¢ OO WHILE NOTSDONE $2000 
18988 3¢ eS 01010101 (125 OCT) 
18989 3° DELAY 
18990 3° READ 01010101 (125 OCT) 
16991 3¢ UPDATE ERROR LIST 
18992 3° 
18993 3° 
18994 
18995 ; CLEANUP -- SECTION 3 
18996 3s COMMUNICATE FAILURE MODE AND LOC INFO 
186997 3 RESTORE BASE AREA (105) + 4 CUSTOMER LOCATIONS 
16998 3; RESTORE REGISTERS 
186999 ; RESTORE BACK BASE 
19000 8 
19001 3 
19002 J SSSSSSSSSSSSESSSSSSSSSSSSSSSSHSSESSESHSSSSHESSSESSSSSSSSSSSSSSSSSESESESHSSESSESES 
19003 
19004 $$ 9S0000000000000000000066666F06SFSF3EFFFSSSSSSSSSEEEEESEDEEEOEES 
113722 000004 15134: 
19005 113724 017737 065210 003050 MOV @SWR ,SAVSWR sSAVE SOF TSWITCH SETTINGS 
19006 113732 005737 001206 TST $PASS 300 ONLY ONCE, IFF ALL COND. O.K. 
19007 113736 001006 BNE 1$ ; ON FIRS’ PASS ( 0) 





Blo. 
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113740 


114170 


010000 065170 


114304 

012 116 
127 

105 123 

111 116 

105 

117 

015 012 
113760 

122 003050 

041777 065112 

177520 0027350 

001060 177520 
141070 
177522 
165000 
000334 
000252 
003022 
177322 
165000 
114270 
165000 
003022 

165000 001126 
177322 
001122 
000776 


MOP s NO, OO AGAINA 
; oa TENV, SENV sIN APT MODE? 
’ BEQ is s «IF YES, EXIT TEST> 
BIT BIT12, SUR s BIT 12 (D0 EEROM TEST) SET? 
BNE 2s : 
Oe 
18: JP TSTEND EXIT POINT FOR PROGRAM 


33%: -ASCIZ <15><12>/NOW TESTING EEROM/<15><12> 


. EVEN 
s SAVE BASE AREA, SWITCH REGISTERS 


2s: TYPE 338 s INDICATE ST UNDERWAY 
MOV SOUR , SAVSUR s SAVE SOFTSWITCH SETTINGS 
BIC 041777, GSU s CLEAR ANY INTERFERR 
BCSR,SA sSAVE REGISTER 
BIS #1060 ,BCSR 8 eeil ‘Ss 
8 ° 
MOV @6POMER+10,R1 sLAST LOCATION IN PROGRAM 
CLR PCR sSTART WITH PAGE O 
CLR Re sDISPLACEMENT 0 
38: MOV 16S000(R2),(R1)> sSTORE A WORD 
TST (R2)> 3GET NEXT WORD 
Cee 0334 ,R2 sMALL 332 LOCATIONS DONE? 
BGT 38 sIF NOT, CONTINUE 


s TEST 2K SECTION 


MOVE =: 0252, RS : FIRST PATTERN, 10 101 010 
CLR ERRCNT ; ZERO THE CUMULATIVE ERROR COUNT 
2018: ROP 
er GR PCR + CLEARS PAGE REGISTER (START @ 165000) 
" Ge R2 s FIRST LOCATION EACH PAGE OF EEROM 
203%: NOP 
MOVE sR, 165000( R2) ; WRITE THE TEST PATTERN 
JSR PC, DELAY ; WAIT FOR WAITE TIME 
CHB sR’, 16S000(R2) ; READ BACK THE WRITTEN WORD 
SEQ 2048 : IF 0. K. READBACK, SKIP HANDLE ERROR 
INC ERRCNT ; UPDATE CUMULATIVE ERROR COUNT 
nove 165000(R2), #80047 ; PUT THE READ DATA IN DISPLAY AREA 
MOV R2, $BOADR : ALSO ADORESS LOCATION INFO 
ERROR 134 ; DO EEROM READ/WRITE ERROR REPORT 
NOP ; CONTINUE TESTING 
2048; ST (R2)> 
CMP 0776,R2 ; LAST LOCATION CHECKED IN A PAGE 
BGT 2038 ; CONTINUE TILL ALL PAGE LOC. TESTED 
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2,PCR 1 CHANGE PCR EVERY S12 DEC. BYTES 
20,PCR 1 8 (256 BYTE PGS IN 2K) © 2 (HOLES)=20 
2028 1 FINISH PAGE 
125,R3 + TEST FOR BOTH PATTERNS WRITTEN 
2058 : EXIT POINT 
125,R3 : INVERT THE TEST PATTERN 
2018 ; 00 THE TEST OVER WITH NEW PATTERN 
: TEST OVER 
@¢POWER+10,R1 sLAST LOCATION IN PROGRAM 
pCR 1START WITH PAGE 0 
$ 
(R1)+, 165000(R2) sRESTORE A WORD 
PC, DELAY s WAIT FOR WRITE TIME 
(R2)« 1GET NEXT WORD 
0334,R2 sALL 332 LOCATIONS DONE? 
118 sIF NOT, CONT 
SAVBR.BCSR sREST 
TSTEND s GOTO NEXT TEST (SMR RESTORED THERE) 
SUBROUTINES AREA ------------------ 
SUDROUTINE CAUSES A DELAY OF A CERTAIN NO OF MILLISECONDS 
MS. DELAYED IS BASED ON THE TYPE OF EEROM AS INDICATED BY RS 
RO, -( SP) 1 SAVE RO 
#10000. , RO : ALL ELSE = 10 MS DELAY 
RO, 18 3 ACTUAL DELAY 
(SP)+, RO : RESTORE RO 


000002 177522 ADO 
000020 177522 ay 
000125 cePS 
BEQ 
000125 MOVB 
BR 
205%: NOP 
141070 MOV 
177522 CLR 
CLR 
165000 118: MOV 
114270 JSR 
TST 
000334 CMP 
@GT 
002730 177520 MOV 
ar 
3 THE OF 
DELAY: MOV 
023420 MOV 
lt S08 
MOV 
RTS 
TSTEND: NOP 


3 EVERYTHING DONE 


SEQ 0352 


| 


Di2 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 16-OCT-84 16:38 PAGE 33 


SEQ 0353 
TEST - LKS BIT 7 
19094 -SBTTL TEST - LKS BIT 7 
19095 : THIS TEST RESTORES THE SOFTWARE SWITCH REGISTER USED IN THE EEROM | 
19096 TEST ABOVE, AND THEREFORE MUST FOLLOW IT DIRECTLY !$! <cccccccoscce 
19097 rTHESE TESTS WILL CHECK FUNCTIONALITY OF LKS<7-6> 
19098 
19099 SACCESS LKS, CHECK THAT READY LKS<07> CAN BE O AND 1. 
19100 ; 
19101 sLKS <O7> LINE CLOCK MONITOR 
19102 ’ <06> LINE CLOCK INTERRUPT ENABLE 
19103 sROUTINE TEST 
19104 sIF UFD AND LKS IS DISABLED THEN 
19105 3. EXIT TEST 
19106 sENDIF 
19107 $. READ LKS TO SEE IF IT TIMEOUTS 
19106 3. (CHECK LKS<07>) 
19109 Be LET R1*@77777( WORST CASE COUNTER FOR SLOW CLOCK) 
19110 3. LET 100°@ADDRESS OF LINE _CLOCK_INTERRUPT 
19111 s. CLEAR INTERRUPT _FLAG 
19112 $. 00 3 TIMES 
19113 8. . REPEAT 
19114 8. ° DECREMENT R1 
19115 3. UNTIL Ri NE @0 OR LOW BYTE OF LKS LT #0 
19116 $. IF LOW BYTE OF LKS GE @0 THEN (READY DIDN'T COME UP) 
19117 3 . ERROR 
19118 $. ENDIF 
19119 $. ENDOO 
19120 $. IF INTERRUPT _FLAG NE @0 THEN CINTERUPT W/0 LKS<6>=1) 
19121 Be . ERROR 
19122 3. ENDIF 
19123 sENDROUT INE 
19124 
19125 § J SSSSSOOSSEESSSESESSESESOESS SOSH SEEEESEESEESESESEESSEEEEEEEEEEEES 
114306 000004 TST3S: SCOPE 

19126 114310 013777 003050 064622 MOV SAVSER , BSHR 3s RESTORE HERE FROM EEROM TEST 
19127 114316 032737 000100 000052 BIT @BIT06 , 8052 sUFD MODE? 
19126 114324 001404 BEG 1s sIF NOT, GO DO TEST 
19129 114326 032737 010000 177520 BIT @61T12,8CSR sLKS DISABLED? 
aaa 114334 001056 BNE TST36 33IF DISABLED, EXIT TEST 

i 
ioe 3s TRY TO ACCESS LKS WITHOUT TIMEOUT 

3 
19134 1143536 013737 000004 001160 1%: MOV ERRVEC , $TMPO sSAVE TIMEOUT VECTOR 
191355 114344 012737 114366 000004 MOV @2¢ ,ERRVEC sPOINT NEW VECTOR TO PROGRAM 
19136 114352 012737 000340 000006 MOV 0340 ,ERRVEC +2 sAT PRIORITY 7 
19137 114360 005737 177546 TST LKS sACCESS LKS 
19138 114364 0004035 BR 3% sIF NO TIMEOUT, CONTINUE 
19139 114366 104056 2s: ERROR +56 s TIMEOUT READING LKS 
19140 114370 005726 TST (SP )o sADJUST STACK POINTER 
19141 114372 005726 TST (SP )- 
on 114374 013737 001160 000004 53%: MOV $TMPO, ERRVEC sRESTORE TIMEOUT VECTOR 
pe 3 CHECK THAT READY BIT LKS<7> CAN BE 1 

s 
19146 114402 042737 000200 177546 BIC @BITO7,LKS 3 START WITH CLEAN SLATE 
19147 114410 005037 002722 CLR LKSFL sCLEAR INTERRUPT FLAG 
19148 114414 012737 134376 000100 MOV @LKSINT,100 sPOINT VECTOR TO INERRUPT ROUTINE 


19149 114422 012737 000340 000102 MOV #340,102 sAT PRIORITY 7 


COKDACO KDJ11-8 


LKS BIT 


114470 


CLUSTER DIAG. MACRO M1200 


012702 000005 

012701 077777 4%: 

105737 177546 S$: 

077104 

105737 177546 6%: 

100401 

104057 

0772135 78: 
737 002722 8s: 

901401 

106961 


Ele 
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3,2 
@77777,R1 
LKS 


SEQ 0354 


3:00 3 TIMES TO SYNCHRONISE 
sCOUNTER FOR SLOW CLOCKS 
sREADY LKS<7>*1? 


5 . BRANCH 

sLKS<07> DOES NOT BECOME 1 

300 AL 3 TIMES 

sANY INTERRUPTS W/O LKS<6>=1? 
33IF NONE, EXIT TEST 

sILLEGAL CLOCK INTERRUPTS 


Fle 
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SEQ 0355 
TEST - LKS INTERRUPT PRIORITY 
19164 .SBTTL TEST - LKS INTERRUPT PRIORITY 
19165 sCHECK THAT LKS INTERRUPTS HAPPEN AT PRIORITY 5S CLEARING LKS<07> 
19166 sAND_DON'T WAPPEN AT PRIORITY 6. 
19167 sROUTINE VEST 
19168 oF UFO AND LKS IS DISABLED THEN 
19169 EXIT TEST 
19170 }ENDIF 
19171 +. SET PRIORITY TO 5S 
19172 i. CLEAR INTERRUPT_FLAG 
19173 es LET LKS<06>*01 CENABLE INTERRUPTS) 
19174 te SET COUNTER TO WAIT FOR 3 INTERRUPTS 
19175 te REPEAT 
19176 te DECREMENT COUNTER 
19177 te UNTIL INTERRUPT_FLAG EQ #3 OR COUNTER EQ #0 
19178 “‘ CLEAR LKS<06> 
19179 3. IF LKS<07> EQ #1 THEN 
19180 od ERROR (WAS NOT CLEARED ON INTERRUPT) 
5182 a > LT TIME_REQUIRED_FOR_3 INTERRUPTS _FOR_800HZ 
t. o 
19183 te ERROR CINTERRUPTS NEVER GO LOW 
19184 ‘ ENDIF 
19185 “ni IF INTERRUPT_FLAG LT @3 THEN 
19186 te ERROR (INTERRUPTS DON’T HAPPEN) 
19187 te ENDIF 
19188 $e CLEAR INTERUPT_FLAG 
19189 e WAIT FOR LKS<7>91 
19190 i. LET LKS<7>=0 
19191 Se IF LKS<7> NE #0 THEN 
19192 Se P ERROR (LKS<7> NOT CLEARED 
19193 be ENDIF 
19194 i. SET PRIORITY TO 6 
19195 $e SET COUNTER TO 1 SLOW CLOCK INTERRUPT 
19196 te SET LKS<06> 
19197 i‘ REPEAT 
19198 ‘. DECREMENT COUNTER 
19199 +. UNTIL COUNTER EQ #0 OR INTERRUPT _ FLAG NE #0 
19200 ‘. IF INTERRUPT_FLAG NE 
19201 te : ERROR (INTERRUPT one AT WRONG PRIORITY) 
19202 ies ENDIF 
19203 3. RESTORE ORIGINAL PRIORITY 
19204 sOOROUTDE 
19205 
19206 sROUTINE LINE_CLOCK_INTERUPT 
19207 INCREMENT INTERRUPT_FLAG 
19208 }ENDROUTINE 
19209 
19210 $$ 9SS6O6666060606666666866606666668606666006866006060660606000806886088 
114472 000004 TST36: SCOPE 
19211 114474 032737 000100 000052 BIT @B1T06, 9052 sUFD MODE? 
19212 114502 001404 BEQ 16 3IF NOT, GO DO TEST 
19213 114504 032737 010000 177520 BIT @81T12,8CSR iLKS DISABLED? 
19216 114512 001132 BNE TST37 ssIF DISABLED, EXIT TEST 
b 
19016 3 WAIT FOR 3 INTERRUPTS AND CHECK LKS<7> TO BE O AFTER INTERRUPT 
a 
19218 114514 042737 000100 177546 16: BIC @BIT06,LKS : FROM END OF TEST 427? PROBLEM 


19219 114522 005037 002722 CLR LKSFL sCLEAR INTERRUPT FLAG 
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LKS INTERRUPT PRIORITY 


Test - 


11 
114572 
114574 


114576 


114774 


012737 


001000 
077737 
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"Gh ie 


sPOINT VECTOR TO ROUTINE 
sCOUNTER FOR SLOW CLOCK 
sSET INTERRUPT ENABLE BIT 
sBIT SET OK? 


BRANCH 
sERROR WRITING 1 TO LKS<6> 
SSET PRIORITY TO 5 

33_ INTERRUPTS HAPPENED? 
sIF YES, BRANCH 

sSTAY IN A LOOP 


sO0ISABLE HALT ON BREAK 

sRAISE PRIORITY 

sOISABLE INTERRUPTS 

3LKS<7> CLEARED AFTER INTERRUPTS? 
:IF 0, BRANCH 

s INTERRUPTS DON’T CLEAR LKS<7> 
tuXSe 791? 


3LKS<7> NOT CLEARED ON WRITE 
3LKS<6>=*0? 

sIF YES, BRANCH 

,;ERROR WRITING 0 TO LKS<6> 
sENABLE HALT ON BREAK 

i COUNTER AT LESS THAN 800HZ? 
sIF NOT, BRANCH 

sREADY LINE DOES NOT GO LOW 
s0ID 3 INTERRUPTS HAPPEN? 


33 
SINTERRUPTS DON‘ T HAPPEN 


sCLEAR INTERRUPT FLAG 
sRAISE PRIORITY TO 6 
COUNTER FOR 


. BRANCH 
;STORE PRIORITY FOR TYPE OUT 
sINTERUPTS HAPPEN AT WRONG PRIORITY 


000100 MOV @LKSINT,100 
MOV 077777,R1 
177546 BIS @BITO6,LKS 
177546 BIT @BITO6,LKS 
BNE es 
ERROR +131 
2s: MTPS @240 
002722 3%: CMP @3,LKSFL 
BEQ A$ 
S08 R1,3% 
* 
3 DISABLE INTERRUPTS AND CHECK THAT PROPER CONDITIONS ARE MET 
3 
177520 48: BIC #1000,BCSR 
MTPS 0340 
177546 BIC @BITO6,LKS 
177546 BIT @BITO7,LKS 
BEQ S$ 
ERROR +62 
S$: TSTB LKS 
BPL 5$ 
CLR LKS 
177546 BIT @BITO7,LKS 
BEQ 6$ 
ERROR +60 
177546 6%: BIT @BITO6,.LKS 
BEQ 7% 
ERROR +131 
177520 7%: BIS #1000 ,8CSR 
CMP 077737, R1 
BGE $ 
ERROR +63 
002722 88: CMP @3,LKSFL 
BEQ 9% 
001124 MOV #3, $GODAT 
ERROR +64 
$ 
3 CHECK WHETHER INTERRUPTS HAPPEN AT PRIORITY 6 
C 
9%: R LKSFL 
MTPS #300 
MOV 677777,R1 
177546 BIS @BITO6,LKS 
108: TST LKSFL 
BNE & 
R1,10% 
11%: TST LKSFL 
BEQ 12s 
001124 MOV #5, $GODAT 
ERROR +65 
12%: MTPS 0340 


sRESTORE PRICRITY 


Migs te ; | 
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TEST - LINE CLOCK DISABLE 


000004 
193086 115002 032737 


001404 
19310 115012 032737 
19311 115020 001052 


19315 115022 0137357 


SEQ 0357 


-SBTTL TEST - LINE CLOCK DISABLE 

sLINE CLOCK DISABLE( +) 
THIS TEST WILL CHECK THAT BCSR<12> DISABLES RESPONSE 
30F LKS REGISTER. 


$ 
sBCSR = <12> LINE CLOCK STATUS REGISTER DISABLE 
° 


PF 
‘salen TEST 
uF UFD AND LKS IS NOT DISABLED THEN 
EXIT TEST 
SENDIF 
WRITE BCSR<12>=21 
LET 4=ADORESS OF LKS_TRAP 
LET TRAP_LKS=0 
READ LKS 
IF TRAP_LKS NE 1 THEN 
ERROR 


ENDIF 
ENDROUT INE 
sROUTINE LKS_TRAP 
3 
¥ LET TRAP_LKS=1 
“eh LET BCSR<12>=0 
iaTI 
3 
FY PRSKSSHSSHESKHHKSSCHKSSSELAHES VORA SHASESHKHOSEHRSERELESOHESSEHARKSEEEHK 
TST37: SCOPE 
BIT @B1T06, 9052 3UFD MODE? 
Q 18 tT NOT, BRANCH 
BIT @81T12,8CSR LKS DISABLED? 
BNE TST40 ssIF DISABLED, EXIT TEST 
3 CHECK BCSR<12> TO BE O AND 1 
3 
16: MOV BCSR, SAVBR sSAVE BCSR REGISTER 
BIC #81T12,8CSR ;CLEAR BCSR 
BIT @61T12,8CSR 3<12>*0? 
BEQ 28 sIF OK, BRANCH 
CLR $GODAT ;CLEAR EXPECTED PATTERN 
ERROR +52 sERROR BCSR READ/WRITE BITS 
2%: BIS @81T12,8CSR VSET BIT 12 
BIT @81T12,68CSR ;GOT SET OK? 
BNE 3% 3IF OK, BRANCH 
MOV @81T12, $GDDAT ;EXPECTED PATTERN 
ERROR +52 sERROR BCSR READ/WRITE BITS 


t] 
s TRY TO ACCESS LKS TO GET A TIMEOUT WITH BCSR<12>«) 
3 
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TEST - LINE CLOCK DISABLE 


013701 


726 
010137 
013737 


000004 
115130 
000340 
177546 


177520 


4s: 


Iie 
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ERRVEC ,R1 


sSAVE TIMEOUT VECTOR 

sPOINT TO PROGRAM AREA 

sAT PRIORITY 7 

sACCESS LKS REGISTER 

:B8CSR<12> DOES NOT DISABLE LKS 
sRESTORE STACK POINTER 


sRESTORE TIMEOUT VECTOR 
sRESTORE BCSR 


J12 iat 
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TEST 


- UNCONDITIONAL CLOCK LINE INTERRUPTS 


-SBTTL TEST - UNCONDITIONAL CLOCK LINE INTERRUPTS 

i UNCONDITIONAL “CLOCK LINE INTERRUPTS( ¢) 

sTHIS TEST WILL CHECK THAT pi +: BCSR<13> TO 1 WILL 

sREQUEST INTERRUPTS WHENEVER A CLOCK LINE IS ASSERTED. THIS 

sSHOULD HAPPEN WITHOUT ACCESSING LKS, THEREFORE, EVEN WITH BCSR<12>=1 
HINTERRUPTS SHOULD HAPPEN. 


18CSR <13> FORCE LINE CLOCK INTERRUPT ENABLE 
$ 


;ROUTINE TEST 
Sd UFD AND FORCE LKS NOT DISABLED THEN 
EXIT TEST 
SENDIF 
LET 100*ADORESS OF UNCONDITIONAL _INTERRUPT_ROUTINE 
DO FOR BCSR<12> FROM #0 TO oiCLKS DISABLED AND ENABLED) 
CF UFD 00 ONLY FOR SELECTED LINE CLOCK) 
CLEAR UNCONDITIONAL _ INTERRUPT 
SET COUNTER TO WAIT FOR 3 INTERRUPTS 
LET BCSR<13>21 
REPEAT 


, DECREMENT COUNTER 
UNTIL NER Gt TIE REQUIReD Ea ¢ 63 A. COUNTER _EQ 60 
CINTERRPTS NEVER "Gd LOW) es 


ENDIF 
IF UNCONDITIONAL _INTERRUPT LT @3 THEN 
ERROR CINTERRUPTS DON’T HAPPEN) 


: ENDIF 
LET BCSR<13>=40 
. ENDDO 
ENDROUT INE 
OTD UNCONDITIONAL _INTERRUPT_ROUTINE 
INCREMENT UNCONDITIONAL _INTERRUPT 
| RETURN 
3 {SEEKS SSESKESEAGROEKLEEEHEEHEHEEHEE EHS AREHAKHSESEKEEE AREER EES 
TST40: OPE 
BIT @B1T06, 9052 sUFD MODE? 
BEQ 18 :IF NOT, BRANCH 
BIT #681T13,8CSR sFORCE INTERRUPT SET? 
BEQ TST41 ssIF SET, EXIT TEST 
3 
3 CHECK BSCR<13> TO BE 0 AND 1 
é 
1% MOV BCSR, SAVER sSAVE BCSR REGISTER 
BIC #1000 ,BCSR ;DISABLE HALT ON BREAK 
BIC #81T13,8CSR ;CLEAR BCSR 
BIT #681T13,8CSR 3¢13>=0? 
BEQ 2s sIF OK, BRANCH 
CLR $GDDAT ;CLEAR EXPECTED PATTERN 
ERROR + sERROR BCSR READ/WRITE BITS 
24: BIS #61T13,8CSR 3SET BIT 13 
BIT 81T13,8CSR 3GOT SET OK? 
BNE 3% :IF OK, BRANCH 
MOV B1T13, $GDDAT sEXPECTED PATTERN 





115254 


104052 


013737 


ERROR 
; SET UP TO DO 
3 
000100 3% MOV 
000102 
177520 BIS 
177520 4%: BIC 
53: Cu 
MOV 
MTP 
002722 6% CMP 
BEQ 
so8 
7% MTPS 
CMP 
BGE 
ERROR 
002722 8% CMP 
BGE 
001124 MOV 
ERROR 
177520 9% BIT 
000052 BIT 
177520 BIT 
177546 10% BIT 
BNE 
ERROR 
177546 11% BIC 


+S2 


UNCONDITIONAL INTERRUPTS 


@LKSINT , 86100 
#340 ,80102 
——— 
#81T12,8CSR 
LKSFL 
077777 ,Re 
#240 
@3,LKSFL 

7% 

R2,6$% 

0340 

#77700 ,R2 
8% 

+63 
@3,,LKSFL 

9% 

#3, $GDDAT 
64 

—— BCSR 
ea1106, 8052 
oe -BCSR 
@#BITO6.LKS 
11% 

+67 


@BIT06.LKS 
SAVBR ,,.BCSR 


K12 
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- UNCONDITIONAL CLOCK LINE INTERRUPTS 


sERROR BCSR READ/WRITE BITS 


sSET UP —* VECTOR 

sAT PRIORITY 

sFOR iST TIME "OIsAeLe LKS 

3G0 00 IT 

sFOR THE 2ND TIME, —— LKS 
sCLEAR INTERRUPTS FLAG 

sCOUNTER TO WAIT FOR INTERRUPTS 
SLOWER PRIORITY TO 5 

33 INTERRUPTS 

sEXIT LOOP, IF SO 
sOTHERWISE, KEEP WAIT 
SRAISE PRIORITY TO 7 
sINTERRUPTS HAPPEN TOO OF TEN? 
VIF NOT, BRANCH 

sREADY LINE DOESN‘ T GO LOW 

sAT LEAST 3 INTERRUPTS HAPPENED? 
sIF SO, BRANCH 

JEXPECTED DATA 

s INTERRUPTS DON'T HAPPEN 

sSECOND TIME THRU THE LOOP? 

sIF NOT, DO IT AGAIN 

sUFD MODE? 

32F NOT, BRANCH 

3IF UFO AND Axe ee 

3CON'T CHECK L 

} INTERRUPT ENABLE LINE HOLD 1? 
3sIF SO, ANCH 

;BCSR<13> DOESN‘ T SET LKS<6> 
sD0ISABLE LKS INTERRUPTS 

sRESTORE BCSR 
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TEST 


- RESETTING LKS 


177546 


177546 


-SBTTL TEST - RESETTING LKS 
sRESETTING LKS(¢) 


uh A + rere 


sTHIS TEST WILL PROVE THAT RESET INSTRUCTION SETS LKS<07> AND 


sCLEARS LKS<06>. 


sROUTINE TEST 

Od UFD AND LKS IS DISABLED THEN 
EXIT TEST 

SENDIF 

‘. POINT LKS VECTOR 100 TO ERROR_LKS_ILLEGAL_INTERRUPT 

; SYNCHRONIZE LKS BY WAITING FOR 3 PULSES 

3 LET LKS<06>=*@1 

; CLEAR LKS (CLEARS LKS<07> 

3. EXECUTE “RESET” 

3. IF LKS<7> NE #1 OR LKS<6> NE #0 THEN 

$. , ERROR 

Sa ENDIF 

7 IF ILLEGAL_LINE_CLOCK_INTERRUPT NE O THEN 

3. - ERROR 

3. ENDIF 

1OOROUTDE 

sROUTINE ERROR_LKS_ILLEGAL_INTERRUPT 

i. FLAG ILLEGAL _LINE_CLOCK_INTERRUPT 

;RETURN 

33 ECSMAKSEHKAHEARESEAREARAADPERHEACEEACAKHERAEHKEHEHEEKEHOKAERHEEHEKEKRERSEK 

TST41: SCOPE 
TST $PASS ;FIRST PASS? 
BE TST42 ssIF NOT FIRST PASS. EXIT TEST 
BIT @BIT06, sUFD MODE? 
BEQ 4 NOT, BRANCH 
SIT #81T12,8CSR LKS DISABLED? 
BEQ TST42 :3IF DISABLED, ettt TEST 


; 
3 SYNCHRONISE WITH LINE TIME CLOCK BY WAITING FOR 3 INTERRUPTS 


3 
1%: 


MOV ° 
BIC #6IT12.8CSR 
MOV @LKSINT ,8@100 
MOV 0340 , 80102 
BIS 6BITOE,.LKS 
LKSFL 

MOV 77777 ,R2 
MTPS 240 

2s: CMP @3,.LKSFL 
BEQ 3% 
soB R2,26 

3%: MTPS 0340 
RESET 
BIT @6IT0O7,LKS 
BNE Ce 
ERROR +70 

4%: BIT @#BITO6,.LKS 
BEQ TST42 
ERROR +71 


OUNTER 
sLOWER PRIORITY TO 5 
33 INTERRUPTS HAPPENED? 
VEXIT Loop, IF SO 
sOTHERWISE, KEEP WAITING 
sRAISE PRIORITY TO 7 
sEXECUTE RESET 
sREADY BIT SET? 
sRESET DOESN'T SET LKS<C7. 
s INTERRUPT ENABLE BIT CLEARED? 
ssIF SO, EXIT TEST 
sRESET DOESN'T CLEAR LKS 


Mle 
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TEST - LINE CLOCK INTERRUPTS 


19546 115714 


013737 
012737 


003032 


116100 
000100 
010000 


177520 
171777 


177520 
134376 
000340 


116116 


177520 


-SBTTL TEST - LINE CLOCK INTERRUPTS 

sLINE CLOCK INTERRUPTS( ¢) 

3BY SETTING TO 1 LKS<06>, THIS TEST WILL CHECK FOR yoy 

sFROM BEVENT LINE AND FROM KDJ11-8 SOHZ, 60HZ, 800HZ ON BOARD SIGNALS 
pe LATTER SIGNALS WILL BE ACCESSED BY SETTING BCSR<11-10>). 


;BCSR «11> <10> CLOCK SELECT BITS 1 AND O 


te) te) EXTERNAL BEVEN) LINE 
ie) 1 ON-BOARD SO HZ 
1 te) ON-BOARD 60 HZ 
1 1 ON-BOARD 800 HZ 
ROUTINE TEST 
” UFD 


THEN 
IF LKS ot oo THEN 
EXIT TEST 


ENDIF 
SET FLAGS TO RUN ONLY WHAT SPECIFIED IN EAPROM 


LET 100*°ADORESS OF LKS_ INTERRUPT 

DO FOR BCSR<11;10> FROM @0 TO #3 

2 LET LKS<06>@1 
WAIT FOR 10 INTERRUPTS FOR EACH CLOCK 
STORE ACTUAL NUMBER OF INTERRUPTS FOR EACH CLOCK 
LET INTERRUPT _FLAG-0 


ENDOO 
, COMPARE NUMBER OF INTERRUPTS FOR EACH CLOCK 
a 
;ROUTINE LKS_INTERRUPT 
3. INCREMENT INTERRUPT _FLAG 
;RETURN 


3 f SSSSSSSSHSSSSSSSSSSSSSSSSSSSSSSSSHSSSSSSSSSSSSSSSSSSESSSSSSSSESESS 


TST42: 


; THIS CODE ADDED FOR APT DEFAULT BREAK 
3 PURPOSES-- TEST TIME LONGER THAN SOME APT BREAK IN 


TST CCHPAS sMAVE DONE ENOUGH INCLUSIVE PASSES? 
BNE 99% 3 NOT YET 
NOP ; DEBUG AID 
JP 10% ; YES SKIP THIS 
99%: NOP 
BIT yee 9052 :UFD MODE? 
BEO ;IF NOT, GO DC THE TEST 
BIT $e1T12,8CSR LKS IS DISABLED? 
BNE TST43 :3IF OISABLED, exit TESTS 
CLR R2 ;CLEAR R2 TO SET FLAGS 
BIS BCSR ,.R2 iSET R2 ACCORDING TO BCSR 


BIC @171777,R2 ;LEAVE OMLY BITS <11-10> 


; 
; SETUP DELAY VALUES FOR INTERRUPTS, IN UFD MODE ONLY FROM THE CLOCK SPECIFIED IN BCSR<11-10 


i 
18: MOV BCSR , SAVBR sSTORE BCSR 


MOV @LKSINT , 100 ;SET UP LKS VECTOR 
MOV #340,102 ;AT PRIORITY 7 
MOV @TIMDEL ,RS sPOINTER TO DEL 


| 
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116114 
116116 


000004 
177520 
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Nie 


MOV 04 ,R4 
CLR BCSR 
BR 3$ 
177520 2% ADO #2000 ,BCSR 
0000S2 3% BIT @BIT06 8052 
BEQ 4 
MOV R2,BCSR 
4$ CLR LKSFL 
177546 BIS @BITO6,LKS 
MOV #10,R3 
S$ MOV #177777 ,R1 
MTPS 0. 
6% CMP LKSFL ,R3 
BEQ 7$ 
S08 R1,6$ 
7$ MOV R1,C(RS)+ 
000052 BIT @BITO6, 
BNE 10% 
so8 R428 
; CHECK THE DELAY VALUES FOR ALL CLOCKS 
H 
MTPS 0340 
177546 BIC #BITO6.LKS 
MOV eT P 
CMP CRS) .6CRS) 
BLO 8s 
ERROR +64 
8%: TST CR5)+ 
CMP CRS),2CR5) 
BLO 9% 
ERROR +64 
9%: TST CRS)+ 
CMP CRS),2(R5) 
BLO 10% 
764 
177520 10%: MOV SAVBR ,BCSR 
177546 BIC @BITO6,LKS 
BR T43 :;EXIT TEST 
TIMDEL: .BLKW 4 


SEQ 0363 


sR4 IS THE COUNTER FOR ALL CLOCKS 
00 FOR BEVENT LINE INTERRUPTS 
GO DO THE LOOP 

sSET UP FOR THE NEXT CLOCK LINE 


sUFD MODE? 

3 IF NOT, 

:IN UFD, DO ONLY FOR SPECIFIED 
;CLE T FLAG 

SET ENABLE BIT 


sSTART COUNTER TO WAIT FOR INTERRUPT 
sLOWER PRIORITY TO 5 


é 
: 


sOTHERWISE, KEEP WAITING 

sSTORE DELAY FOR EACH CLOCK 
sUFD MODE? 

3IF UFD, DON’T DO FOR ANY OTHER 
;ALL LINE CLOCKS DONE? 


sRAISE PRIORITY 
s INCREMENT 
sDELAY FOR SOHZ AND 60HZ? 


:IF FIRST BIGGER, BRANCH 
sWRONG @ OF INTERRUPTS 


sRESTORE BCSR 
sDISABLE INTERRUPTS 


B15... 
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SEQ 0364 
TEST - MAINTENANCE REGISTER TEST 
19590 -SBTTL TEST ~- MAINTENANCE REGISTER TEST 
19591 sMAINTENANCE REGISTER TEST 
19592 : THIS TEST WILL ADORESS MAINTENANCE REGISTER AND CHECK BITS 
19593 37-4 TO BE 0010, 2-1 TO BE 10, AND READ BITS 10-06, 03, 00 
19594 sFOR FUTURE THOSE SITS REPRESENT THE FOLL SIGNALS: 
19595 {MULTIPROCESSOR SLAVE. a SYSTEM, FPA AVAILABLE, HALT/TRAP 
19596 sOPTION, a. AC POWER OKAY 
19597 sROUTINE TEST 
19596 t. IF MAINT. REG. BITS <7-4> NE 0010 OR <2-1> NE 10 THEN 
19599 t. ° ERROR 
19600 a. ENDIF 
19601 ‘. READ MAINT.REG. BITS <10-086,03,00> 
7 s ENDROUT INE 
19604 § SOSSOOSOSSSSESEHESESEEESEESEEOSEEEEEESESESEEOSEESEOSEEEEEEEEEESE 
116126 000004 TST43; SCOPE 
19605 116130 032737 174000 177750 BIT #174000 , MAIREG sUNUSED BITS ALL ZEROS? 
19606 116136 001401 BQ 18 +A OK, BRANCH 
19607 116140 104132 ERROR +132 owe REGISTER ERROR 
19606 116142 032737 000044 177750 1%: BIT 044 ,MAIREG <5, 2> SET 
19609 116150 001001 BONE 2s sIF SO, BRANCH 
19610 116152 1041352 ERROR +132 s MAINTENANCE — ERROR 
19611 116154 032737 000322 177750 2%: BIT 0322 ,MAIREG iT, 6.4,1> CLEAR 
19612 116162 001401 REQ TST44 ssIF YES, BRANCH 
19613 116164 104152 ERROR +132 
19614 
19615 


C13 
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TEST - SERIAL LINE UNIT REGISTERS 


022722 
103770 
010137 


177524 


-SOTTL TEST - SERIAL LINE UNIT REGISTERS 

sSERIAL LINE UNIT TEST(¢) 

s8CR<2-0> WILL BE READ TO FIND OUT SAUD RATE. SLU WILL BE PROG- 
sRAHED TO CHECK THE INTERRUPT LEVELS BY SETTING BIT<06> IN 
sRCSR AND XMIT. LOOP BACK CAPABILITIES WILL BE TESTED BY SETTING 
170 1 XCSR<O2>. THE LINE CLOCK INTERRUPT SUBROUTINE WILL BE 
sUSED TO RETURN TO THE EXECUTION OF THE DIAGNOSTICS, IF THE 
sPROGRAM HANGS IN THE LOOP BACK MODE. 


sROUTINE TEST 
3IF UFO AND CONSOLE NOT PRESENT 

" GO TO TEST_22 

3s ENDIF 

‘. IF BCR<07> EQ 60 THEN 

, READ BCR<2-0> TO GET BAUD RATE 
; os 4-ADORESS OF TIMEOUT ROUTINE 

3 ms e 

i. 00 F SA, xCSR.ROUF , XBUF 

: > aati. 

3. ° 

i. ; . ERROR 

te * ENDIF 

] . 

3 ENDROUT INE 

° 

sROUTINE T 


IMEOUT 
$. LET TIMEOUT _FLAG=-01 
ENDROUT INE 


8S SSSSSSSSSSSSSSSSSESSSSSSSSSSSSSSSSSSOSSSSSSESSSSSSHSSESHSSESSESS 
TST 


a4; 
@B1T06 8652 3sUFO MODE? 
£8 i$ sIF NOT, GO DO THE TEST 
BIT #61107 ,6CR sIF UFD AND CONSOLE NOT PRESENT 
Bea is sNOT TRUE. DO THE TEST 
JP SLEND 3IF TRUE, SKIP ALL SLU TESTS 
3 
s TRY TO ACCESS SLU REGISTERS 
3 
1%: MOV C.R1 sSAVE TIMEOUT VECTOR 
MOV 03% ,ERRVEC 3°0 NEW ONE TO PROGRAM AREA 
MOV »ERRVEC o2 sAT PRIORITY 7 
MOV @RCSR ,R2 sSTART ACCESSING WITH RCSR 
26: TST se ) sACCESS SLU REGISTER 
BR 3sIF NO TIME e 
36 MOV Re, ¢BO00AT estore ADORESS THAT T D OuT 
ERROR +72 sTIMEQUT ACCESSING SLU REGISTER 
4$; CMP aXBUF .(R2)+ iLAST REGISTER ACCESSED? 
6L0 3IF NOT, BRANCH 
MOV + ERRVEC RESTORE TIMEOUT VECTOR 


SEQ 0365 


L:3 +. toe 
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TEST - XCSR BIT 7 
19667 .SBTTL TEST - XCSR BIT 7 
19668 3CHECK THAT XCSR<07> CAN BE O AND 1. 
19669 8 
19670 sXCSR = <<07> TRANSMITTER READY 
19671 ’ 
19672 sROUTINE TEST 
19673 Be WAIT FOR XCSR<07>*@1 NO MORE THAN 200MSEC 
19674 $. IF XCSR<07> NE @1 THEN 
19675 Ge . ERROM 
19676 Be ENDIF 
19677 . LET XBUF -@NUL 
19678 a. WAIT FOR XCSA<O7> 901 
19679 Be LET XBUF -@NULL 
19680 $. IF XCSR<07> NE O THEN 
19661 $. . ERROR (READY DION'T GO LOW) 
19682 t. ENDIF 
19683 3s ENDROUT INE 
19684 
19685 § POCOHSSSSSSSESSESESESSESESESEREDEESEESEOESEEEDEESEEESEEEEEESEESS 
116264 TST45: 
19686 116266 012701 001000 MOV #1000 ,R1 sCOUNTER FOR ABOUT 200MICROSEC. 
19687 116272 122737 000001 001220 cePB OAPTENV , SENV sRUNNING IN APT MODE? 
196868 116300 001003 BNE $ 3sNO, GO DOO TEST 
19689 116302 737 001206 TST $PASS sFIRST PASS? 
19690 116306 001017 BNE TST46 13IF APT AND NOT FIRST PASS, EXIT TEST 
19691 116310 105737 177564 18: TSTB xCSR sXCSR<7> READY 1? 
19692 116314 100401 BMI 2s sIF SO, EXIT WAIT OOP 
19693 116316 077104 R1.1% sIF NOT 1, CONTINUE WAITING 
19694 116320 105737 177564 2s: TST6 xc sXCSR<7>*1? 
19695 116324 100401 BMI 3% sIF YES, BRANCH 
19696 116326 104075 ERROR +73 sXCSR<7> DOES NOT BECOME 1 
19697 116330 012737 000000 177566 53%: MOV ONULL , XBUF sTRY TO TRANSMIT NULL CHARACTER 
19696 116336 105737 177564 TSTB CSR 3XCSR<7>=0 
19699 116342 100001 BPL TST46 ssIF YES, EXIT TEST 
cooek 116344 104073 ERROR +73 ;XMIT READY DION’ T GO LOW 


SEQ 0366 
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RCSR BIT 7 AND XCSR BIT 2 


012737 000021 
060000 
105737 177560 


E13 


MACRO M1200 18-OCT-84 16:38 PAGE 42 


001220 


177564 
177564 


177566 


-SBTTL TEST - RCSR BIT 7 AND XCSR BIT 2 
sCHECK THAT RCSR<07> CAN BE 0 AND 1 AND THAT XCSR<02> WORKS PROPERLY. 


’ 
sRCSR = <O7> RECEIVER DONE 
XxCSR <02> MAINTENANCE 


; ROUTINE TEST 
Se — RCSR<07> AND XCSR-07>) 
WAIT FOR XCSR<07>-61 
LET XCSR<02>=@1 (LOOP BACK MODE) 
LET XBUF °@125 
WAIT FOR RCSR<07>*«@1 NO MORE THAN 200MSEC 
d RCSR<0O7> NE 61 THEN 
ERROR sn ewe DOES NOT BECOME 1 OR XCSR<02>D0ES NOT 


ENDIF 
IF RBUF NE #125 THEN 
ERROR 


ENDIF 
IF RCSR<O7> NE #0 THEN 
ERROR (RCSR<07>D0ES NOT GO LOW) 


ENDIF 
LET XCSR<02>=60 
3 ENDROUI TNE 
§ PPSSSOSSSSESSOSSSSSESESESESESESEHSSEEESEEEEESECESESESESEEEESEESS 
TST46: 
MOV #13,R1 sCOUNTER FOR ABOUT 2O00MICROSEC. 
Cres @APTENV , SENV sRUNNING IN APT MODE? 
BNE 1% sNO, GO OO TEST 
TST $PASS sFIRST PASS? 
BNE TST47 33IF APT AND NOT FIRST PASS, EXIT TEST 
18: TsTé xCSR sXCSR<7> READY 1? 
BPL is sIF NOT 1, CONTINUE WAITING 
2s: BIS @68TTO2],xCSR 3sSET LOOP BACK MODE 
BIT @#68ITO2],xXCSR sGOT SET OK? 
BNE 3% sIF YES, BRANCH 
CLR xCSR sRESET TO PRINT ERROR 
ERROR +114 sXCSR<2> DOES NOT BECOME 1 
@R TST47 2sEXIT TEST 


4 
+ STALL FOR A WHILE IN CASE XCSR<2> CAUSES RCSR<7> TO BE 1 
$$: MOV. -—«-@60000,, R1 sSTALL IN CASE XCSR<2> SETS READY 


4%; TST8 RCSR sIF RECEIVER READY 
BMI S$ sIF SET, BRANCH 
SOB R1,4% OTHERWISE, STAY FOR A WHILE 
BR 6$ sIF NOT READY, BRANCH 

S$: TST RBUF sREAD RBUF 


; TRANSMIT XON AND CHECK RCSR<7> 


6s: MOV #21, XBUF s TRANSMIT A CHARACTER 


MOV #60000 ,R1 sCOUNTER TO WAIT 
78: TST8 RCSR sRCSR<7> READY 1? 
BMI 8s sIF YES, EXIT WAIT LOOP 
R1,7% ,;OTHERWISE, CONTINUE WAITING 
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TEST 


177560 
177564 


177562 
000021 


MACRO M1200 
- RCSR BIT 7 AND XCSR BIT 2 


001126 
001126 


001124 


177564 


108: 


118: 


F13_ 
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o7 
#BITO2,xXCSR 


2> 
sRECEIVER READY = COME UP 
sSTORE RECEIVED DAT 

sDATA RECEIVED OK? 

sIF YES, BRANCH 


sRESET TO ENABLE SLU 

sWRONG CHARACTER RECEIVED 
sRCSR<7>*0? 

sIF ZERO, BRANCH 

IRESET TO ENABLE SLU 
sRCSR<O07><>0 AFTER READING RBUF 
sDISABLE LOOP BACK MODE 


G13 
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TEST - RESET AND XCSR<2!0> 


000004 
116564 005737 001206 
116570 001011 
116572 052737 000005 177564 


000005 
116602 032737 000005 177564 
116610 001401 
116612 104102 


-SBTTL TEST - RESET AND XCSR<2!0> 
sCHECK THAT RESET CLEARS XCSR<O!2>, 
sROUTINE TEST 
3. (CHECK RCSR<07> AND XCSR<O07> AND RESET) 
LET XCSR<02, <a (LOOP BACK MODE ) 
EXECUTE 
IF XCSRcO2!00> NE #0 THEN 

ERROR 


ENDIF 

LET XCSR<02>=60 

INE 
LL SSOSKETSERHSCAHESHHHAHERAHERHEHEHREDEHRERSSELARRAEEREASEEHESSAEHESEHHERSH 
Ss : 

TST eevee sFIRST PASS? 

BNE sTso 33IF NOT FIRST PASS, EXIT TEST 
18: BIS eal702!8IT00, XCSR sLO0P BACK MODE 


; 
: EXECUTE RESET AND VALIDATE THAT XCSR<7,2> BECOMES <1,0> 


RESET sEXECUTE RE 

SIT #8ITO2]!BITOO, xXCSR sXCSR<2,0> CLEAR? 

BEQ TSTSO ssIF YES, BRANCH 

ERROR +102 sXCSR<2,0> NOT CLEARED ON RESET 


MLS. 
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TEST - RESET AND INTERRUPT ENABLE BITS 


001206 


000100 
000100 


116760 
000340 
000100 


-SBTTL TEST - RESET AND INTERRUPT ENABLE BI7S 
sCHECK THAT INTERRUPTS DON'T HAPPEN AT PRIORITY 4 AND THAT RESET 
sCLEARS XCSR<06> AND RCSR<06>. 


HRCSR <06> RECEIVER INTERRUPT ENABLE 
TRANSMIT 


SEQ 0370 


:XCSR <06> TER INTERRUPT ENABLE 

: 

sROUTINE TEST 

te LET 60=@ADORESS_OF _ILLEGAL _INTERRUPT_XRCSR 
, LET 64*@ADORESS_OF ILLEGAL INTERRUPT _XRCSR 
: SET PRIORITY TO 4 

: LET XCSR<02>=@1 (LOOPBACK MODE) 

: LET XCSR<06>°01 (ENABLE TRANSMIT INTERRUPTS) 
: LET RCSR<06>-01 (ENABLE RECEIVE INTERRUPTS) 
i. WAIT FOR XCSR<07>=@1 (READY TO TRANSMIT) 

3. LET XBUF*@NULL (SEND A CHARACTER) 

; WAIT FOR ILLEGAL INTERRUPTS (ABOUT 200MSEC) 
3 EXECUTE “RESET” 

: IF XCSR<06> NE @0 OR RCSR<06> NE #0 OR XRCSR NE @0 THEN 
3 . ERROR 

t. ENDIF 

i. RESTORE PRIORITY TO NORMAL 

3 ENDROUT INE 

3 

sROUTINE ILLEGAL _INTERRUPT_XRCSR 

i. INCREMENT XRCSR 

3 ENDROUT INE 


8 § SSSASSSSSSSSSSSSSSSSSSSSSSSSSHSSSSSSESSESSSHSSSSSSESESESSESSESEESEEE 
Ts 


TST 
BNE 


$PASS 
S$ 


sFIRST PASS? 
3SKIP RESET PART OF THE TEST 


CHECK THAT INTERRUPTS ENABLE BITS FOR RECEIVER AND TRASMITTER OF SLU 
ARE CLEARED BY RESET 


$: BIS @BITOE,XCSR sSET INTERRUPT ENABLE BIT IN XCSR 
BIT #8ITO6,XCSR sGOT SET OK? 
BNE 2s sIF YES, BRANCH 
ERROR +110 sIN BIT 6 OF XCSR 
2s Bis #BIT06,.RCSR sSET INTERRUPT ENABLE BIT IN RCSR 
BIT @BIT06 ,RCSR :GOT SET OK? 
BNE 3% sIF YES, BRANCH 
ERROR +110 HIN BIT 6 OF RSCR 
3%: RESET sINLINE BUS RESET 
BIT @8IT06,XCSR ’ T INTERRUPT ENABLE BIT CLEARED? 
BEQ &e sIF CLEARED, BRANCH 
ERROR +102 : INTERRUPT ENABLE NOT CLEARED ON RESET 
4%: BIT #BITO06,RCSR sRECEIVE INTERRUPT ENBLE CLEARED? 
BEQ 5¢ sIF CLEARED, BRANCH 
ERROR +102 s INTERRUPT ENABLE NOT CLEARED ON RESET 
: 
3 CHECK THAT TRANSMIT INTERRUPTS DON'T HAPPEN AT PRIORITY HIGHER THAN 3 
> 
5$: MOV 996 , 2064 sPOINT XMIT VECTOR TO PROGRAM AREA 
MOV 0340 , 8666 3AT PRIORITY 7 
BIS @BITO6 , XCSR ;SEY INTERRUPT ENABLE BIT IN XCSR 





TEST 


012702 
000402 


000340 
000040 
000026 


000200 


000340 
000100 


117076 
000340 
177564 


177560 


177562 
000004 


177564 


177564 


177564 


177560 


177564 


12s: 
138: 


14%: 
15%: 


16%: 


See (kiero 
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- RESET AND INTERRUPT ENABLE BITS 


Ss 
sIF INTERRUPTS DION’ T HAPPENED, BRANCH 
sINTERRUPTS HAPPEN AT WRONG PRIORITY 
SCLEAN UP THE STACK 


sAT PRIORITY 4? 

sIF NOT LAST ONE, CONTINUE 
sRESTORE PRIORITY 7 

sCLEAR INTERRUPT ENABLE BIT 


THAT RECEIVE INTERRUPTS DON’T HAPPEN AT PRIORITY HIGHER THAN 3 


MOV 0340 ,R2 
BR 7$ 
Su8 #40 ,R2 
MTPS R2 
MOV 026 ,R3 
$08 R368 
BR 108 
#101 
TST (SP )+ 
TST (SP )« 
#200, 
BNE 63 
MTPS 0340 
BIC @BIT06,XCSR 
MOV #15 , 8060 
MOV 0340 , 8062 
TSTs xc 
BPL 11% 
MOV P 
BIS @BITO6 .RCSR 
MOV @340 ,R2 
BR 13% 
SUB 040 ,R2 
BIS @6ITO2,xXCSR 
MTPS 
MOV #100,R3 
S08 R3,148 
BE $ 
BIC @BITO2,xCSR 
101 
TST (SP)> 
TST (SP )- 
CMP #200 ,R2 
BNE 12% 


H 
3; CLEAN UP BEFORE NEXT TEST 


RBUF 
e6ITO2,xXCSR 


sPOINT as VECTOR TO PROGRAM AREA 

saT PRIORITY 

3 TRANSMITTER READY 

iIF NOT, WAIT 

po TO TRANSMIT NULL 
T INTERRUPT ENABLE BIT IN KCSR 

}SET PRIORITY TO 7 

160 WAIT IN CASE *F INTERRUPTS 

sLOWER PRIORITY LEVEL 

sSET LOOP BACK MODE 


AY 
sWAIT FOR INTERRUPTS 
sIF INTERRUPTS DIDN'T HAPPENED, BRANCH 
sCLEAR LOOP BACK MODE 
s INTERRUPTS HAPPEN AT WRONG PRIORITY 
sCLEAN UP THE STACK 


sAT PRIORITY 4? 
sIF NOT LAST ONE, CONTINUE 


sRESTORE PRIORITY 
sCLEAR INTERRUPT ENABLE BIT 


IF SO 
;OTHERWISE, STAY IN THE LOOP 
sREAD CHARACTER TRANSMITTED 
sCLEAR LOOP BACK MODE 


SEQ 0371 


we he ” ty a Sao 
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SEQ 037 
TEST - INTERRUPT PRIORITY FOR SLU . 
19910 -SBTTL TEST - INTERRUPT PRIORITY FOR SLU 
19911 sCHECK THAT INTERRUPTS HAPPEN AT PRIORITY 3 AND THAT THEY CLEAR 
19912 sRCSR<06> AND XCSR<06>. 
19913 H 
19914 sROUTINE TEST 
19915 3. LET 60°@ADDRESS_OF LEGAL _RINTERRUPT 
19916 t. LET 64°@ADORESS_OF _LEGAL _XINTERRUPT 
19917 Be LET XCSR<02>*61 
19918 6 SET PRIORITY TO #3 
19919 Be WAIT FOR XINTERRUPT=03 
19920 8. IF XCSR<07> EQ #1 THEN 
19921 8. ° ERROR 
19922 6 ENDIF 
19923 8. WAIT FOR RINTERRUPT=03 
19924 3. IF RCSR<0O7> EQ #0 THEN 
19925 8. . ERROR 
19926 36 ENDIF 
19927 8. LET XCSR<02>=60 
19928 . SET PRIORITY TO NORMAL 
19929 3s ENDROUTINE 
19930 
19931 sROUTINE LEGAL _XINT T 
19932 . LET XBUF -@CHARACTER 
19933 . ERRUPT 
19934 sENDROUT 
19935 3 
19936 sROUTINE LEGAL _RINTERRUPT 
19937 3. READ RCSR 
19938 8. INCREMENT RINTERRUPT 
19939 3s ENDROUTINE 
19340 
19941 § i SSSSSSSSEENEEESEEESEEEESSSEEEEEEEEEEESEEEEEEEHEEEEESE EOEEEDEEDE 
117160 000004 TSTS1: 

19942 117162 122737 000001 001220 CMPB @APTENV , SENV sRUNNING IN APT MODE? 
19943 117170 001003 BNE 100% sNO, GO DO TEST 
19944 117172 005737 001206 TST $PASS sFIRST PASS? 
foeer 117176 001115 BNE TSTS2 33IF APT AND NOT FIRST PASS, EXIT TEST 
9946 s 
eee ; GET READY FOR INTERRUPTS 
9948 3 
19949 117200 012737 117374 000060 100%: MOV 06% ,8060 sSTORE RECEIVER VECTOR 
19950 117206 012737 117320 000064 MOV 06% , 8064 sSTORE TRANSMITTER VECTOR 
19951 117214 012737 000340 000062 MOV 0340 , 8062 sAT PRIORITY 7 
19952 117222 012737 000340 000066 MOV 0340 , 8066 3FOR RECEIVER AND TRANSMITTER 
19953 117230 052737 000004 177564 BIS #BITO2,XCSR 3SET LOOP BACK MODE 
19954 117236 012701 000100 MOV #100,R1 sDELAY FOR UNEXPECTED CHARACTERS 
19955 117242 105737 177560 1%: TSTB RCSR sRECEIVER READY? 
19956 117246 100401 BMI 2s sIF YES, BRANCH 
19957 117250 077104 $08 R1,1% sOTHERWISE, WAIT JUST IN CASE 
oe 117252 005737 177562 2s: TST RBUF s;READ RECEIVER 
9959 ; 
ey s SET PRIORITIES AND XMIT INTERRUPTS 

3 
19962 117256 012702 000140 MOV #140,R2 sSTART WITH PRIORITY 3 
19963 117262 000402 BR ae sTRY TO DO IT 
19964 117264 162702 000040 3%: SUB 040 ,R2 sLOWER PRIORITY 
19965 117270 106402 4%: MTPS R2 ;TRY TO DO AT LOWER PRIORITY 


Se ea re eT eT ee Ee 
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TEST - INTERRUPT PRIORITY FOR 


19966 117272 


052737 
012703 
077301 


©00100 
001000 


000004 


SLU 
177564 


177564 


177560 


SEQ 0373 


BIS #8ITO6,xXCSR 
MOV #1000 ,R3 
5%: $08 R3,5% 
BIC e702, xCsR 
ERROR +107 
ae TSTS2 
o 
3 TRANSMITTER INTERRUPT HERE 
é 
6%: TST (SP )+ 
TST CSP )« 
BIC #BITO6 ,XCSR 
MOV @NULL , XBUF 
BIS @BITO06,RCSR 
MTPS R2 
MOV #100000 ,R3 
78: S08 R3,7% 
BIC #68ITO2,xXCSR 
#107 
BR 9% 
MTPS 0340 
o 
3; RECEIVER INTERRUPT HERE 
” 
8s: TST (SP )+ 
TST (SP )« 
TST RBUF 
9%: TST he 
3$ 
MTPS 0340 
BIC #BITO6,.RCSR 
CLR XCSR 


sLOOP BACK € INTERRUPT ENABLE 
sWAIT DELAY FOR INTERRUPTS 
sWAIT FOR XMIT INTERRUPTS 
sCLEAR LOOP BACK BIT 

sNO XMIT INTERRUPTS 


33IF ERROR, EXIT TEST 


sCLEAN UP STACK 
sCLEAR INTERRUPT ENABLE 
T NULL 


sRAISE PRIORITY 


s;CLEAN UP STACK 


sREAD a o BUFFER 
sPRIORITY O 

3IF NOT YET, CONTINUE 
;RAISE PRIORITY TO 7 
sCLEAR RECEIVE INTER. ENABLE 
;CLEAR XCSR 


L135 


COKDACO KDJi1-B8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 46 


TEST 


- BREAK CONDITION 


-SBTTL TEST 


- BREAK CONDITION 


sCHECK THAT SENDING BREAK CAUSES FRAMING ERROR. 


3 
sRCSR = <15> 
3 <13> 
3 <11l> 
’ 

3XCSR <00> 
3 

sROUTINE TEST 


ENDIF 


ERROR 
FRAMING ERROR 
RECEIVED BREAK 


TRANSMIT BREAK 


LET XCSR<02>=61 

LET XCSR<00>=61 

WAIT FOR RCSR<07>=41 

IF RBUF<15!13!11> NE @1 THEN 
ERROR (ERROR, 


FRAMING ERROR, RECEIVE BREAK NE 1) 


LET XCSR<00>=60 
IF XCSR<00> NE #0 T 
ERROR 


cXesR<00> DOES NOT GO LOW) 


ENDIF 

WAIT FOR XCSR<07>=61 
LET XBUF*@NULL (SEND NULL CHARACTER TO SEE ERROR CLEARED) 
WAIT FOR RCSR<07>=01 

IF RBUF<15!13!11> NE #0 THEN 
° ERROR 


ENDIF 
LET XCSR<00>=61 
EXECUTE “RESET” 
IF XCSR<00> NE @0 THEN 
. ERROR 
‘ ENDIF 
‘ LET XCSR<02>=80 
ENDROUT INE 
3 J SQeRSSEHKEESESEHEAEREAGHHAAEEEEAEOEEAHHAEAHHDAHAEHSSLSEHEHAKH ERE DHE 
TSTS2: SCOPE 
3 
3; DECIDE WHETHER TO RUN THIS TEST 
3 
BIT @8IT07 ,@e52 sUFD MODE? 
BNE TSTS3 33IN UFD MODE, EXIT TEST 
TST #PASS sFIRST PASS? 
BNE TSTS3 33IF APT AND NOT FIRST PASS, EXIT TEST 
3 
s SEND BREAK AND CHECK ERROR BITS IN RBUF 
b 
1%: BIS @#BITO2,XCSR 3; TRANSMIT IN LOOP BACK 
MOV BCSR , SAVBR ;SAVE BCSR 
BIC #8IT09,BCSR ;DISABLE HALT ON BREAK 
BIS #BITOO, XCSR ;SET SEND BREAK BIT 
BIT @#BITOO, XCSR 3;GOT SET OK? 
BNE 2s :IF YES, BRANCH 
ERROR +110 ;WRITING 1 TO XCSR<O> 
2s: MOV #100,R1 sSTALL DELAY 
4s: TST8 RCSR sRECEIVER READY? 
BMI 5$ :IF YES, BRANCH 
$08 R1,48 ;WAIT JUST IN CASE OF A CHARACTER 





COKDACO 
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- BREAK CONDITION 


117710 042737 000004 


M13 
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S$: Ts? 


177564 BIS @BITOO,xXCSR 
OV #1000 ,R1 
6s: S06 R1.68 
78: TSTs RCSR 
BPL 78 
001126 Ov 
001126 ~~ item ieee emanate 
177564 BIc @8ITO2,.xCSR 
ERROR +105 
Es TSTss ;sEXIT 
177564 83: BIC eBr7co XC 
177564 BIT @BITOO, xCSR 
BEG ot 
177564 BIc @BITO2.xXCSR 
ERROR +110 
BR TsTs3 ;;EXIT 
3 
; CHECK THAT BREAK CONDITION IS CLEARED 
3 
177520 98: SAVBR ,.BCSR 
108 TST6 xCSR 
BPL 108 
177566 mOv 0177, xBUF 
11s TsT8 RCSR 
BPL 118 
001126 Ov RBUF . SBODAT 
001126 BIT @BIT1IS!:6IT135!:61111. sB00AT 
BEQ 12¢ 
177564 BIC @BITO2,xCSR 
ERROR 106 
177564 12%: BIC @#8IT02,XCSR 


sREAD A CHARACTER 

; TRANSMIT BREAK 

; ANOTHER DELAY TO GET BREAK 
sWAIT A ia 

sRECEIVER READY? 

3;IF MOT, WAIT 

s STORE WHATEVER RECEIVED 
sM.i ERROR BITS SET? 

IF YES. 

RESET To ENABLE SLU 

;BREAK DOES NOT CAUSE ERRORS 


:STORE RECEIVE BUFFER 
sERRORS CLEARED? 


tIF Yves, BRANCH 

sRESET TO ENABLE SL 

;BREAK NOT CLEARED ON NEXT CHARACTER 
;CLEAR LOOP BACK MODE 


N13 
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TEST 


117716 


- OVERRUN CONDITION 


-SBTTL TEST - OVERRUN CONDITION 
CHECK OVERRUN 


SEQ 0376 


F CONDITION 
; 
;RCSR = <14> OVERRUN ERROR 
; 
;ROUTINE TEST 
™ LET XCSR<02>=@1 (LOOPBACK MODE) 
3 WAIT FOR XCSR<07>=61 
3 LET XBUF -@252 
3 WAIT FOR XCSR<07>=¢1 
3 LET XBUF*°@125 (SEND THE 2ND W/O READING THE 1ST CHARACTER) 
3 WAIT FOR RCSR<07>=61 
: STALL FOR LOWEST rg 4 RATE TO GET 2ND CHARACTER 
3 IF LOW BYTE OF RBUF NE #125 THEN 
F ERROR (1ST CHARACTER WASN'T OVERRUN) 
Bu ENDIF 
tT IF RBUF<15!14> NE #1 T 
3 ‘ ERROR (NO OVERRUN BIT SET) 
3 ENDIF 
3 WAIT FOR XCSR<07>=61 
3 LET X®UF -@NULL 
3 WAIT FOR RCSR<07>=61 
3 IF RBUF<15!14> NE 60 THE 
F how ERROR (WASN'T CLEARED ON THE NEXT CHARACT=R RECEIVEC) 
Ba 
‘. LET XCSR<02>=80 
3 ENDROUT INE 
FF FRGSEELEHOSSHKEKEHAHEOHOERSEBADHSSSKHARSSHHSKHEHRHARKRTEARAREKRSS HHA AREAS 
STS3: SCOPE 
CMPB @APTENV, SENV ;RUNNING IN APT MODE? 
BNE 100% 3NO, GO DO TEST 
TST $PASS 3sFIRST PASS? 
TSTS4 :3IF APT AND NOT FIRST PASS, EXIT TEST 
100%:  6IS @BITO2,XCSR :SET LOOP BACK MODE 
1s: TsT8 sREADY TO TRANSMIT? 
is 3IF NOT, T 
#21, XBUF : A CHARACTER 
2s: TSTB sRECEIVE READY? 
2s :IF NOT, WAIT 
3%; TSTB XCSR sREADY TO TRANSMIT? 
3$ IF NOT, WAIT 
MOV 0177, XBUF ; TRANSMIT THE 2ND CHARACTER 
MOV #150000 ,R3 sSTALL FOR THE 2ND CHARACTER 
4s: S08 R348 ;WAIT A WHILE 
MOV RBUF , SBDDAT ;STORE RECEIVED DATA 
MOV #140177, $GDDAT ;EXPETED PATTERN 
CMPB #177, $BDDAT s2ND CHARACTER RECEIVED? 
BEQ 5% :IF YES, BRANCH 
BIC #B8ITO2,XCSR ;RESET TO ENABLE SLU 
ERROR +11 ;2ND CHARACTER DIDN'T an 1st 
5$: CMPB @BIT7!BIT6, SBDDAT+1 ; OVERRUN ERROR BITS SET? 
BEQ 65 IF YES, BRANCH 
CLR XCSR sRESET TO ENABLE SLU 
ERROR e112 ;OVERRUN DOES NOT SET ERP 5S BITS 
BR T3STS4 3;EXIT 


a me ee ee ee Ce ee Se —_—- -~ 
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- OVERRUN CONDITION 


B14 
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177566 


177562 
1773564 
177564 


s SEND NEXT CHARACTER TO CLEAR OVERRUN CONDITIONS 


64: TSTB xCSR 


78: TST8 RCSR 

BPL 7$ 

BIT ee »RBUF 
BIC BI TO2,xXCSR 
EPROR ell 
6s: BIC @BITO2,xCSR 
SLEND: 


an On READY? 


sIF NOT, AND WAIT 
i T MULL CHARACTER 
sRECEIVER READY? 
sIF NOT, BRANCH AND WAIT 
s ANY SET? 
sIF NOT, BRANCH 


iRESET TO ny y RE 
sOVERRUN NO T CLEARED ON NEXT CHAR. 
:CLEAR Loo BACK MODE BIT 


sLAST SLU TEST 


— = SO :—e 


COKDACO KDJ11-8 CLUSTER DIAG. 
TEST - LED'S ON 


000004 
177777 


C14. 
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SEQ 0378 


-SBTTL TEST - LED'S ON 


sLEO'S ON 
THIS TEST WILL INITIALIZE BOR TO CONTAIN A ROTATING PATTERN 
ne IN LED'S. 


} ROUTINE TEST 
3. WHILE A KEY NOT RECEIVED FROM KEYBOARD 00 
te . STALL ALLOWING TIME TO SEE PATTERN 
‘x . ROTATE LEFT TO LIGHT UP NEXT LED'S 
t. ENDOO 
s ENDROUT INE 
§ J OSSOSSOCSOSSSSSEESSESSSSSESEEEEEEESSSSEEEESEOEEEESEESESESEEEEES 
TSTS4: SC 
#1000 ,BCSR sENABLE HOB FOR APT 
CLR RS sFLAG IN NO INTERRRUPT MODE 
BIT @BITOO ,8052 sIF RUNMING IN CHAIN MODE 
BE 1% sSKIP PRINTOUTS 
TST 6PASS 31ST PASS? 
sIF NOT, SKIP PRINTOUTS 
OAPTENV , SENV sAPT MODE? 
BEQ 1% prt vr PRINTOUT'S 
RS FLAG IN INTERRUPT MODE 
TYPE . SCRLF 
TYPE -LECS sIDENTIFY THE TEST 
MOV 5% , 8060 sRECEIVE SLU VECTOR 
0340, 3AT PRIORITY 7 
BIS @BITO6 .RCSR sENABLE 
MTPS #140 sLOWER PRIORITY 
1%: MOV sFOR EACH LOOP 
Mov @76,R1 sSTART WITH 
2s: MOvVB a 3 TURN OFF FIRST LED 
MOV sSTALL DELAY 
38: MOV o177777, Re sSTALL DELAY 
4%: so8 R2,48 sWAIT A WHILE 
$os8 R3,3% sWAIT A WHILE 
SEC 3SET CARRY 
ROL Ri GET —= LED 
$oB8 R426 300 A FEW TIMES 
TST sRUNNING IN INTERACTIVE MODE? 
BEQ 6$ uF NOT, EXIT 
TYPE . $BELL 
6R i$ {REPEAT PATTERN 
5$;: TST sREAD FER 
~ sADJUST STACK 
68: OvB 0377 ,B80R 3sNO MORE 
BIC #1000 ,8CSR sDOISABLE HOB FOR APT 
BR TSTS5 33EXIT TEST 


LEDS: «ASCII <12><15>/THIS IS A TEST FOR ON-BOARD LED'S/<12><15> 


D14 
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TEST - LED'S ON 


SEQ 0379 


120375 7 123 012 
120376 015 

120402 105 101 
120405 116 131 040 


20213 -EVEN 


20212 120377 124 poet 120 -ASCIZ /TYPE ANY CHARACTER ON A KEYBOARD TO CONTINUE/<12><15> 
20214 


E14 
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TEST 


- MEMORY MAPPING 


.SBTTL TEST - MEMORY MAPPING 
sMEMORY MAPPING 

sTHIS TEST WILL AUTOSIZE MEMORY IN 2K BYTES. EVERY PAGE WILL BE 
3CHECKED FOR WHAT pang 3 iy Q-BUS, UNIBUS OR PMI BUS MEMORY BY 


3. LET 4°ADDRESS OF NON-EXISTENT_MEMORY 
IF KMCR<05-00> NE @1 THEN (NOT ALL UNIBUS MEMORY) 
TURN ON MMU AND REMAP THE PROGRAM AREA 


00 "FOR KDPARO FROM @0 TO #177600 
0O FOR Ri FROM @0 TO #20000 BY #4000 
° READ (R1) 


- ABORT _NON-EXISTENT_MEMORY NE 1 
MEMOR Ss 


Y EXIST 

READ (R1)+ 

GF navondss £0 2.MITS TEN 

: PMi MEMORY 

ELSE 

’ IF HIT/MISS EQ HIT THEN 
; Q-BUS MEMORY 
ELSE 
: ERROR 
ENDIF 


ENDIF 
ENDIF 
LET ABORT _NON-EXISTENT_MEMORY =00 
; _ENDDO 
UNTILL ABORT_NON-EXISTANT_MEMORY EQ 61 
ENDIF 
ENDROUT INE 
sROUTINE NON-EXISTENT _MEMORY 
. LET ABORT_NON-EXISTENT_MEMORY=01 
RE TURN 


JENDROUT INE 
§ FOSSSOESSSOSSESSSSSESSEESERSSEESEEESEESESESEEESEESSEEEEEEEEEEESS 
TSTSS: 
BI TOO, 2052 3CHAIN MODE? 
BEQ TSTS6 s3IF SO, EXIT TEST 
TST $PASS sFIRST PASS? 
BNE TSTS6 33IF APT AND NOT FIRST PASS, EXIT TEST 
OAPTENV, SE T MODE? 


CMPB NV $ 

BEQ TSTS6 23YES, SKIP PRINTOUT'S 
r 
3; SETUP ALL REGISTERS FOR MAPPING 


MOV #400,CCR sFLUSH THE CACHE 
sSTORE TIMEOUT VECTOR 
sPOINT TO PROGRAM AREA 
sAT PRIORITY 4 


sREMAP PROGRAM AREA 
sUSED FOR MAPPING MEMORY 


SEQ 0380 
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TEST 


20272 
20273 
20274 
20275 
202 

20277 
20278 
20279 


o 


UCL TEEEEPEE EEL ELLE 


MEMORY MAPPING 


177572 
000020 


177600 


000004 
177572 
000020 


F14 


MACRO M1200 16-OCT-84 16:38 PAGE 49-1 


172516 


172354 


172354 


172516 


e 
1%: 
2s: 


3%: 
4%; 


5$: 
6%: 


i 
3 MAPPING IS DONE, 


: 
7%: 
8$: 


9%: 


sCLEAR PAGE COUNT FOR PHI 
sCLEAR PAGE COUNT FOR QBUS 
sENABLE MEMORY MANGEMENT 
sENABLE 22 BITS 

sGO ACCESS 


s INCREMENT BY 4K WORDS 
sACCESS THRU KIPARG 
sSTART DOING IT 

s INCREMENT BY 1K WORDS 
sACCESS 1ST LOCATION 
sDISABLE HALT ON BREAK 


sACCESS 2ND LOCATION 
sSTORE REGISTER 
BREAK 


sENABLE HALT ON 
;LAST (R1) HIT? 
sIF . @BUS 


MEMORY 
S INCREMENT 1K COUNT FOR PHI 
sGO CONI 


ANCH 
:IF 2M, DON'T TOUCH STACK 


sADJUST STACK 


sRESTORE ERROR VECTOR 
sDISABLE MEMORY MANGEMENT 
sDISABLE 22 BITS 

sANY PMI MEMORY? 

sIF NOT, GO CHECK QBUS MEMORY 


s TRANSLATE TO BYTES 
sSTORE 1K @ ON STACK 
PAGES 


: 
sTYPE ASCII 


CLR R2 
CLR R3 
INC 
BIS #81 T04 , MARS 
BR 2 
; TRY TO MAP ALL PAGES 
ADO @200 , KIPAR6 
MOV #140000 ,R1 
BR at 
@3776,R1 
TST (R1)« 
BIC #:000,BCSR 
TST (R1) 
MOV HITMIS ,RECDAT 
BIS #1000, BCSR 
BIT @BITO2,RECDAT 
BEQ S$ 
INC R2 
BR 6% 
INC R3 
cep #154000 ,R1 
BHI 3% 
cep #177600 ,KIPAR6 
BNE 1$ 
BR 8s 
FIND OUT HOW MANY PAGES WERE THERE 
TST CSP )> 
TST (SP )+ 
MOV R4, Cc 
CLR MMRO 
BIC #8 1T04 , MARS 
TST 
BEQ 9% 
ASL 
MOV R2,-(SP) 
TYPOS 
TYPE . MEMK 
TST R3 
BEQ 10% 
ASL R3 
MOV R3,-CSP) 
TYPOS 
TYPE -MEMQ 
BR TSTS6 ssEXIT TEST 


-ASCIZ /K BYTES OF PMI MEMORY/<12><15> 


TNUE 
COUNT FOR QBUS MEM. 


SEQ 0361 


G14 
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TEST - 


20322 


MEMORY 


MAPPING 


015 000 
040 102 
124 105 
040 117 
040 121 
102 1 
040 115 
115 117 
131 012 
000 


000004 
121076 000004 
000340 


172100 
002740 


000002 
172136 


000004 
001000 177746 


MEMQ: -ASCIZ /K BYTES OF Q-BUS MEMORY/<12><15> 


- EVEN 
-SBTTL WRONG Bye ABORT TEST 
sWRONG PARITY ABORT 


THIS TEST VERIFIES AGORT TO 114 USING PARITY OR ECC MEMORY CSR. 
sIF he 1 CSR PRESENT, ALL OF THEM WILL BE WRITTEN AT THE 
sSAME T 


TEST 

SIZE FOR ALL POSSIBLE MEMORY CSR’S 
STORE UP TO 16 CSR STARTING FROM TEMP 
WRITE ALL WITH WRONG PARITY 

WRITE TO 0 
READ IT 


BACK 
al NO ABORT TO 114 THEN 
ERROR IN PARITY ABORT LOGIC 


RESTORE Csr’ s 


; 
3 
5 
: 
3. 
3. 
: 
« 
$- 
3. 

s ENDROUT INE 


3S SSSSSSHSSSSSSSSSSSSSSSSSSSHE SESS NSESESSSSEHSSHSHESESHSESSSHESSESEESD 


TSTS6: SCOPE 
; 
; FIND OUT ALL POSSIBLE MEMORY CSR LOCATIONS UP TO 16 
H 
sSTORE TIMEOUT VECTOR 


MOV 02¢ ,ERRVEC sPOINT NEW TO PROGRAM 
0340 ,ERRVEC+2 3AT PRIORITY 7 
CLR R4 sCOUNT FOR CSR'S 
MOV #172100 ,R2 sFIRST POSSIBLE 
MOV P sSTORAGE LOCATION 
1%: TST (R2) 3IS CSR THERE? 
MOV R2,(R3)> sIF THERE, STORE 
INC Ra s INCRENENT COUNT FOR CSR'S 
BR 3% :BRANCH AROUND 
2s: TST (SP )-+ IRESTORE STACK 
TST (SP)+ 
3%: ADO @2,R2 sPOINT 19 NEW CSR 
CMP #172136 ,R2 ;ALL DONE? 
BHI 1% :IF NOT, BRANCH 
R1, ERRVEC ;RESTORE ERROR VECTOR 


MOV 
BIS #6ITO9,CCR 


ITE ALL CSR’'S WITH WRONG ECC CODE 
TE: IN PARITY MEMORY THOSE BITS “AE READ ONLY AND 
DIAGNOSTIC MODE BIT FOR FC. IS THE SAME AS WRONG PARITY 


sSET CACHE BYPASS 


SEQ 0382 


H1i4 
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WRONG PARITY ABORT TEST 


013701 000114 


010137 


121220 000114 
000340 000116 


177744 
001124 
177746 9%: 


S$: 


7%: 
8s: 


R4, 
oT 


90114 ,R1 
06% ,80114 
#340 , 90116 


EMP .R 
@81702'B1T00, @0(R3) 
03740, 8(R3)> 


900 

R2,R4 

@TEMP .RS 

#81 TO2, AC R3)+ 
R2,5% 


oe 

— $GDOAT 
#6ITO9,CCR 

ae0 


MSER 
R1,80114 


SEQ 0383 


sSTORE PARITY ABORT VECTOR 
sPOINT NEW TO PROGRAM 

sAT PRIORITY 7 

sSTORE CSR COUNT 

sSTART ae 1ST CSR 


sCLEAR TEST LOCATION WITH WRONG PR 
sRESTORE COUNTER 

sSTART WITH 1ST CSR 

sCLEAR ALL WRONG PARITY 


BACK WRONG PARITY 
sNO WRONG PARITY ABORT 


sADJUST STACK 


s;START WITH 1ST CSR 
sCLEAR ALL WRONG PARITY 
sIN ALL CSR‘S 

sABORT REFLECTED IN MSER? 
sIF YES, BRANCH 


H 

sMSER<15> NOT SET ON PARITY ABORT 
sCLEAR CACHE BYPASS 
s;CLEAR WRONG PARITY 
sCLEAR MSER 

sRESTORE PARITY ABORT 


os 


114 
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TEST - DMA TAG PARITY IN STANDALONE MODE 


003032 


001000 


177520 


002730 


177520 
177746 


177746 
177520 


-SBTTL TEST 
sCHECK DMA TAG STORE PARITY BIT. 


; 

sROUTINE DMA_PARITY 

2 GENERATE PARITY ERRORS 
i. CHECK MSER<13> 

a LET BCSR<08>=60 

3 ENDROUT INE 


- DMA TAG PARITY IN STANDALONE MODE 


SE SPAHS AAS PASE HHEAEKRAREEHAHEHHASHETESHKAEAHERHKEHKHES SEOCARRERAKEREE SHSM 
SCOPE 


TSTS?7: 
NOP 
TST CCHPAS 
cies 99% 
woe 
BR 
99%: NOP 
3 
s ALLOCATE CODE IN CACHE 
F 
HOV @OMAPAR ,R2 


TST60 


BIC #1000 ,BCSR 
1%: TST CR2)+ 

CMP @OPAREN ,R2 

BNE 1% 

TST TEMP 

MOV BCSR , SAVBR 


sHAVE DONE ENOUGH INCLUSIVE PASSES? 
3 NOT YET 


3 DEBUG AID 
33GO TO NEXT TEST 


sPOINT TO STANDALONE CODE 
sDISABLE HALT ON BREAK 
sALLOCATE IN CACHE 

sLAST ADORESS? 

3IF NOT, BRANCH 

sALLOCATE TEST LOCATION 
;SAVE BCSR 


; 
3 IN STANDALONE MODE TRY TO VERIFY RESPONSE TO PARITY ERRORS 


i 
OMAPAR: BIS #6IT06 .BCSR 
#61IT10!BITOO,CCR 
TEMP 
MOV MSER ,RS 
BIC #61T10,CCR 
2s: BIC #8IT08 .BCSR 


F 

3; RETURN FROM STANDALONE MODE 
3 

OPAREN: 


#60020 ,R'5 
BEQ 4s 
ERROR 117 


4$: CLR 


sSET STANDALONE MODE BIT 
sWRITE WRONG TAG PARITY 
sWRITE HIT WITH WRONG PARITY 
sSTORE MSER 

:CLEAR WRONG PARITY BIT 
sCLEAR STANDALONF BIT 


;WRONG DMA PARITY? 
3IF OK, BRANCH 
3MSER NOT SET IN STANDALONE MODE 


sFLUSH THE CACHE 
sRESTORE BCSR 
sENABLE HALT ON BREAK 


J14 2 
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SE 0385 
TEST - DMA TAG PARITY W/O STANDALONE MODE | 

20454 .SBTTL TEST - DMA TAG PARITY W/O STANDALONE MODE ' 
20455 ;CHECK DMA TAG PARITY BIT WITHOUT GOING INTO STANDALONE MODE. 
20456 3 
20457 3;CCR <10> WRITE WRONG TAG PARITY 
20458 3 
2045? sROUTINE TEST 
20460 . LET CCR<10>=41 
20461 Ss ALLOCATE LOCATION IN CACHE 
20462 Ss INITIATE OMA eye ee 
20463 Ss IF MSER<04> NE #1 T 
20464 Ss ERROR 
20465 is ENDIF 
20466 3 ENDROUTINE 
20467 
20468 5 § 90660000 00606000000806666606060060066666606660600600066666600080808 

121452 000004 TST60: SCOPE 
20469 121454 000240 NOP 
20470 121456 005737 003032 TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
20471 121462 001002 BNE 99% 3; NOT YET 
20472 121464 NOP ; DEBUG AID 
20473 121 000471 BR TST61 33GO TO NEXT TEST 
rode 121470 99% NOP 
20476 121472 032737 000200 000052 BIT #8IT07 ,8052 sUFD MODE? 
20477 121500 001402 BEQ 110% 3IF NOT, BRANCH 
20478 121502 000137 135446 JP sEOP ; OTHERWISE , NEXT PASS 
20479 121506 0605737 110%: TST CSR1 sAT LEAST ONE Q22RE FOUND? 
coset 121512 001457 BEQ TST61 3:IF NOT, EXIT TEST 
2048 3 
os 3 ALLOCATE TEST IN CACHE 
2048 3 
20484 121514 012703 121514 11%: MOV #.,R3 sSTART WITH CURRENT INSTRUCTION 
20485 121520 005723 10%: TST CR3)-+ sREAD A WORD 
20486 121522 022703 121632 CMP 04% ,R3 3PLL DONE? 
20487 121526 001374 BNE 10% 3IF NOT, CONTINUE 
20488 3 
ceed 3 WRITE A WORD WITH WRONG PARITY 

3 

20491 121530 013737 000114 001160 i1%: MOV 80114, $TMPO sSTORE PARITY VECTOR 
20492 121536 012737 121604 000114 MOV 02% ,80114 sPOINT TO TEST AREA 
20493 121544 052737 177746 BIS #8IT10,CCR ;WRITE WRONG TAG PARITY 
20494 121552 005037 002740 CLR TEMP ;WRITE MISS WITH WRONG TAG PARITY 
20495 121556 042737 002000 177746 BIC #8IT10,CCR sCLEAR WRONG TAG PARITY 
20496 121564 052737 000200 177746 BIS #81IT07,CCR sPARITY ABORT 
20497 121572 CLR sFLAG TO DO 1 TRANSFER 
20496 121574 004737 134704 JSR PC .OMATRN 300 OMA WRITE TO TEMP THRU Q22BE 
20499 121600 104116 ERROR +116 sNO PARITY ABORT 
20500 121602 000413 BR 4$ sBRANCH TO TEST MSER 
205C1 121604 013704 177744 2s: MOV MSER ,R4 STORE REGISTER 
20502 121610 005037 177744 CLR MSER EAR MSER 
20503 121614 005726 TST (SP )+ 
20504 121616 005726 TST (SP )-+ i RESTORE STACK 
20505 121620 005726 TST (SP )+ 
20506 121622 032704 000020 3%; BIT @BITO4 ,R4 R OK? 
20507 121626 001001 BNE 4$ 3IF SET, BRANCH 
20508 121630 104116 ERROR +116 ;MSER<4> NOT SET 
20509 121632 005037 177744 43: CLR MSER ;CLEAR MSER 
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20510 121636 012737 000400 177746 MOV #400,CCR 
20511 121644 015737 001160 000114 MOV $TMPO, 80114 


ven Me 


me a ee ee ee ee ee —_—_————_. 


sFLUSH CACHE 
sRESTORE VECTOR 


SEQ 0386 


Li400 
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TEST 


- OMA WRITE HIT CYCLES 


003032 


.SBTTL TEST - OMA WRITE HIT CYCLES 
sCHECK THAT DMA WRITE HITS INVALIDATE CACHE. 
sROUTINE TEST 
is ALLOCATE A LOCATION IN CACHE 
Us INITIATE OMA WRITE TO THIS LOCATION 
3 READ THIS LOCATION BACK 
3 IF IT IS CHANGED OR HIT/MISS EQ HIT 
F P ERROR 
: ENDIF 
3 WRITE TO THE FIRST 16 LOCATION THEIR ADDRESS 
8 00 BLOCK MODE TRANSFER TO THOSE LOCATIONS 
Ris START READ WITH THE LAST LOCATION 
J. IF RECORD ANY HITS THEN 
3 
F ENDIF 
3 INITIATE READ DMA TO THE SAME TEST LOCATIONS 
3 RED THEM BACK 
3 IF HIT/MISS NE HIT THEN 
3 
Bs ENDIF 
3s ENDROUTINE 
T61: 
NOP 
TST CCHPAS 
BNE 99% 3; NOT YET 
NOP ; DEBUG AID 
JP ALLEND ; YES SKIP THIS 
99%: NOP 
BIT #B8IT07 ,ae52 
BEQ i$ 
JP $E0P 
1%: TST CSR1 
BNE 2s 
JP sE0P 
3 
3 TRY TO DO DMA WRITE AT ALL DIFFERENT PRIORITIES 
3 
2s: MOV 0340,R2 
BR 4% 
3%: SUB #40 ,R2 
4$: CLR TEMP 
CLR 
MTPS R2 
PC ,OMATRN 
BIC #1000 ,B8CSR 
TST TEMP 
MOV ewes, RECDAT 
BIS #1000, BCSR 
BIT #8IT02, RECDAT 
BEQ 5$ 
ERROR +120 
5$: CMP 012525, TEMP 
BEQ 6% 
ERROR +123 


| 
DE FEROS EKSESASKEKERESEEOAEBEHESAEAHEHASHESHAHEREREASEHASAREALRE SHAH 
Ts SC 


sHAVE DONE ENOUGH INCLUSIVE PASSES? 


sUFD MODE? 

;IF NOT. BRANCH 
sOTHERWISE, NEXT PASS 
sAT LEAST 1 Q22BE? 
sIF YES, BRANCH 
;OTHERWISE, NEXT PASS 


sSTART WITH 7 


:GO DO IT 

;sLOWER PRIORITY 

sCLEAR TEST LOCATION 
300 JUST 1 WORD 
7 PRIORITY 

a 


sSTORE HIT/MISS 
sENABLE HALT ON BREAK 
sLAST ACCESS HIT? 

:IF MISS, BRANCH 


sDATO OK? 
;IF SO, BRANCH 
;DATO 


SEERECEEEEEEEEESCEREREERERS ESV AvunaSECHAEEEER 


T 


20569 
20570 
20571 
20572 
20573 
20574 
20575 
205 

20577 
20576 
20579 


Te 


Ww 


o 


122022 
122024 
122026 


005702 
001341 
106427 


172354 
172314 
177572 
000004 


6%: 


2%: 
3%: 


TST 
BNE 
MTPS 


OF DATO AND CHECK FOR MISS 


R2 
3$ 
#340 


VERIFY THAT BYPASS WITH DMA DATI INVALIDATES CACHE 


#B8ITO9,CCR 

PC ,OMATRN 

CCR 

#1000 ,BCSR 
TEMP 

HITMIS ,RECDAT 
#1000 ,BCSR 
#8ITO2,RECDAT 
DATBO 

123 


TEMP , SBA 
#1701, 8CSR1 
RN 


CR2 
HITMIS ,RECDAT 
#1000 ,BCSR 

ee »RECDAT 


121 

12525 ,,(R>)>+ 
5% 

+123 


#2,R2 
R1,3% 


PC, INITMM 
#2000 , KIPAR6 
#6IT15,KIPOR6 
#6 I TOO, MMRO 


M14 
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- OMA WRITE HIT CYCLES 


sLAST PRIORITY 0? 
sIF NOT, BRANCH 
;RESTORE PRIORITY 


;SET BYPASS 

300 OMA DATI 

sCLEAR BYPASS 

sDISABLE HALT ON BREAK 
3IN CACHE? 

sSTORE REGISTER 


sCOUNTER FOR 6 


sNO BLOCK MODE SLAVE 
;COUNTER FOR 4 LOCATIONS 
sSTART WITH TEMP 
;DISABLE HALT ON BREAK 
;ACCESS A LOCATION 
;STORE REGISTER 

;ENABLE HALT ON BREAK 


~ 4 NOT, 


‘START WITH 32K 
;EXIT 





N14 
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TEST - DMA WRITE HIT CYCLES 


20626 122314 012701 010000 MOV #10000 ,R1 ;COUNTER FOR 4K 
20627 122320 005022 6$: CLR (R2)+ ;CLEAR ALL 16 
20628 122322 077102 S068 R1,6% ;00 ALL 16 
20629 122324 INC sFLAG BLOCK 
20630 122326 012777 000000 0603534 60,3BA sLOAD OMA ADDRESS 
20631 122334 012777 170000 06023350 MOV @-10000 , WC 300 4K 
20632 122342 012777 003701 060314 MOV #3701 .@CSRi 316 WORDS FROM 32K 
20633 122350 004737 134704 JSR PC ,OMATRN 300 DATBO 
20634 122354 012701 004000 7%: MOV #4000 ,R1 ;COUNTER FOR 4K LOCATIONS 
20635 122360 012702 140000 MOV #140000 ,R2 ;START WITH O 
20636 122364 042737 001000 177520 8%: BIC #1000 ,BCSR sDISABLE HALT ON BREAK 
20637 122372 005712 TST ¢ sACCESS A LOCATION 
20638 122374 013737 177752 111464 MOV HITMIS ,RECDAT sSTORE REGISTER 
20639 122402 052737 001000 177520 BIS #1000, BCSR sENABLE HALT ON BREAK 
20640 122410 032737 000004 111464 BIT eBITO2, RECDAT sHIT? 
20641 122416 001401 BEQ nie sIF NOT, BRANCH 
20642 122420 104121 ERROR s0MA DOES NOT INVALIDATE 
20643 122422 022722 012525 9%: CMP 912525, (R2)s sDATO OK? 
20644 122426 001401 BEQ 10$ :IF SO,BRANCH 
20645 122430 104123 ERROR +123 3IN DMA 
20646 122432 062702 000002 108: ADD $2 ,R2 3:00 IN 2 WORDS 
20647 122436 077126 S08 R1,8$ 300 ALL OF THEM 
20648 3 
20649 ; CHECK DATI 
20650 3 
20651 122440 005037 177572 DATI: CLR MMRO sDISABLE MMU 
20652 122444 012706 001100 MOV #1100,SP sRESTORE STACK 
20653 122450 012737 135056 000004 MOV @TOUT , 804 ;AND TIMEOUT 
20654 122456 012737 052525 002740 MnV #52525 , TEMP ;LOAD MEMORY 
20655 122464 005000 CLR RO ;JUST 1 WORD 
20656 122466 004737 134766 JSR PC ,OMARD 300 DATI 
20657 122472 022777 052525 060174 CMP #52525 ,@DATA ;DATI OK? 
20658 122500 001401 BEQ 11$ :IF YES, BRANCH 
20659 122502 1041235 ERROR +123 ;DATI 
20660 3 
20661 ; DO DATBI 
20662 F 
20663 122504 012701 000010 11%: MOV #10,R1 ;COUNTER FOR 16 LOCATIONS 
20664 122510 012702 002740 MOV OTEMP ,R2 sSTART WITH TEMP 
20665 122514 012703 002740 MOV @TEMP ,R3 sSTART WITH TEMP 
26666 122520 010322 12%: MOV R3,CR2)+ sPUT ADORESSES 
20667 122522 005723 TST CR3)-¢ sINCREMENT ADDRESS 
20668 122524 077103 $08 R1,12¢ :00 

122526 INC sFLAG BLOCK MODE 
20670 122530 004737 134766 JSR PC ,OMARD 300 DATBI 
20671 122534 032777 010000 060124 BIT #8IT12,aCSR2 ;NO BLOCK MODE SLAVE? 
20672 122542 001401 BEQ 13% ;IF NO, BRANCH 
20673 122544 104123 ERROR +123 
20674 122546 022777 002756 060120 13%: CMP @TEMP+16,8DATA ;DATI OK? 
20675 122554 001401 BEQ 14% :IF SO, BRANCH 
20676 122556 104123 ERROR +123 ;IN DATIB 
20677 122560 042737 001000 177520 14%: BIC #1000,B8CSR ;DISABLE HALT ON BREAK 
20678 122566 005737 002740 TST TEMP ;ACCESS 
20679 122572 013737 177752 111464 mov wes, RECDAT :STORE REGISTER 
20689 122600 052737 001000 177520 BIS #1000, BcsR ;ENABLE HALT ON BREAK 
20681 122606 032737 000004 111464 BIT @81T02,RECDAT ;HIT? 


20662 122614 001001 BNE 15% sIF YES, BRANCH 


B15 
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TEST - DMA WRITE HIT CYCLES 

20683 122616 104125 ERROR +123 

20684 122620 : 

20685 122620 ALLEND: 


SEQ 0390 


COKDACO KDJ11-8 CLUSTER DIPG. 
TEST - DIFFERENT LEVELS OF INTERRUPTS 


C15 


MACRO M1200 16-OCT-84 16:38 PAGE 53 


001160 
001160 


SEQ 0391 

.SBTTL TEST - OIFFERENT LEVELS OF INTERRUPTS 

sOIFFERENT LEVELS OF INTERRUPTS 

sTHIS TEST WILL PROGRAM Q22 BUS EXERCISER TO INTERRUPT AT DIFFERENT 

sLEVELS. ARBITRATION BETWEEN DIFFERCNT LEVELS OF INTERRIPTS AND 

sPIRQ'S WILL BE TESTED. 

a 

s CHECK OIFFERENT LEVELS OF INTERRUPTS. 

;ROUTINE TEST 

i. SET VECTOR TO INTERRUPT_DMA 

te FOR INTERRUPTS FROM 4 I 7 00 

és ENABLE 

i. SET LONI TYOTNTERUPT 

he IF INTERRUPT_FLAG SET THEN 

3. oe 

3. ENDIF 

~~" ENABLE INTERRUPTS 

a SET PRIORITY* INTERRUPT -1 

is IF INTERRUPT_FLAG NOTSET THEN 

t. 

tis ‘ ENDIF 

be : LET INTERRUPT _DMA=0 

= ENDOO 

OORONDE 

sROUTINE INTERUP 

‘ LET ENTER T _FLAG=1 

1 RETURN 

s ENDROUT INE 

3 § SSOSSSSSSSSSHSSHSSSSSSSSSSSSSSHSSESSSSSSSSSSESSSHOSSHSESSSSSESESEESD 

TST62: 
BIT @BIT07, 9052 sUFD MODE? 
BME TST63 ssIF SO, EXIT TEST 
TST CSR1 sAT LEAST ONE @22BE FOUND? 
BEQ TST63 ssIF NOT, EXIT TEST 

3 

3 SETUP INITIAL PRIORITY TO 7 

i 
MOV CSR1,RS 300 FOR FIRST FOUND Q22BE 
MOV 05+, @vVQBE1 sPOINT INTERRUPT VECTOR TO PROGRAM 
MOV 340, BVOPR1 sAT PRIORITY 7 
MOV 2EN,RO sSTART WITH 7 FOR INTERRUPTS 
MOV 0340,R1 3LOW BOUNDARY FOR NC INTERRUPTS 
ar 2s i TRY TO DO IT FOR FIRST 

1%: Sus 40 ,R1 3LOWER LOW BOUNDARY 


s CHECK THAT INTERRUPTS DON'T HAPPEN AT PRIORITY HIGHER THAN BR 


$ 

2s: MOV 0340, $TMPO sTOP PRIORITY FOR NO INTERRUPTS 
BR ae 100 FIRST ONE 

36: SUB 040, $THPO 300 AT NEXT LEVEL 

4%; MTPS sTMPO sSET PRIORITY NOT TO INTERRUPT 
JSR PC ,Q22INT sENABLE INTERRUPTS 
MOV (RO)+ ,@CSR2 sCLEAR GO BIT 
NOP 
NOP 
NOP 


COKDACO 


DiS 
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SEQ 0392 

DIFFERENT LEVELS OF INTERRUPTS 
122736 000403 BR 6s 1IF NO INTERUPT, BRANCH 
122740 104126 S$; ERROR +126 sINTERRUPTS HAPPEN 
122742 005726 TST (SP)+ RESTORE STACK 
122744 005726 TST (SP )- 
122746 020137 001160 64: R1, sTHPO sLAST ONE? 
122752 001355 BNE 35 :IF NOT BRANCH 
122754 022710 000002 CHP @2,(RO) sAT BRA? 
122760 001 BNE 18 :IF NOT LAST ONE, BRANCH 

3 

; INTERRUPT AT ALL LEVELS 

012777 123056 057706 INQ22: MOV 05%, @VOBE1 :POINT INTERRUPT VECTOR TO PROGRAM 
122770 012777 000340 057702 MOV 0340, BVOFR1 sAT PRIORITY 7 
122776 012700 003002 MOV €022EN,, RO ;START WITH 7 FOR INTERRUPTS 
123002 012701 000300 MOV @300,R1 sTOP BOUNDARY FOR INTERRUPTS 
3006 BR 28 ;TRY TO OO IT FOR FIRST 

123010 162701 000040 18 SUB 040,R1 sLOWER TOP BOUNDARY 

i 

: CHECK THAT INTERRUPTS HAPPEN AT PRIORITY LOWER THAN BR 
123014 010137 001160 28 MOV —s_-R1, STO sPRIORITY FOR INTERRUPTS 

BR as 100 FIRST ONE 

12 162737 000040 001160 38: SUB 040, $THPO 300 AT NEXT LEVEL 
123030 106437 001160 as: MTPS = STHPO SET PRIORITY NOT TO INTERRUPT 
123034 004737 1 JSR —s« PC, Q22 INT sENABLE INTERRUPTS 
123040 011077 057622 HOV (RO), BCSR2 ;CLEAR GO BIT 
123044 000240 NOP ;WATT A WHILE 
123046 000240 NOP 
123059 000240 NOP 
123052 104126 ERROR +126 INTERRUPTS DON'T HAPPEN 
123054 BR 6$ sD0N'T RESTORE STACK 
123036 005726 S$: TST (SP)+ RESTORE STACK 
123060 005726 TST (SP)- 
123062 005737 001160 6: TST $THPO sLAST ONE 0? 
123066 001355 BNE ‘ :IF NOT BRANCH 
123070 022720 000002 CHP @2,(RO)+ 3AT BRA? 
123074 001345 BNE IF NOT LAST ONE, BRANCH 


Ei5 


KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 54 
ARBITRATION BETWEEN PIRQ‘'S AND INTERRUPTS 


702 000140 
177772 
040000 


057552 


020000 


SEQ 0393 


- ARBITRATION BETWEEN PIRQ'S AND INTERRUPTS 


-SBTTL TEST 
3s CHECK pny ' ORDER BETWEEN PIRQ'S AND INTERRUPTS. 
;ROUTINE EST 
: IF UFO THEN 
EXIT TEST 


: ENDOO 
ENDROUT INE 


ENDIF 
ON ST pe wee 


SET PRIORITY TO I 


ENABLE INTERRUPT(I+1) AND PIRQ(I+1) 
IF satenty~ + yen: WAS BEFORE PIRQ(I+1) THEN 


ENDIF 


} SPCCSSOSSESSESEEESSSSESSEEESESSERESEESSEESEEESEESEEESESEEEOSEEEES 
TST63: 


BNE 
TST 
BEQ 


1%: 
2s: 


a 


38: 


4%: 
5$: 


lest hes 


CLR 


PIRQT;: .WORD 


@81T07,@052 sUFD MODE? 
TST64 33IF SO, EXIT we 
CSR1 T LEAST ONE Q22BE FOUND? 
TST64 ssIF NOT, EXIT rést 
@3¢ ,@vQBE1 SETUP Q22BE VECTOR 
0340, @VOPR1 3AT PRIORITY 7 
04% ,PIRQVEC ;SETUP PIRO VECTOR 
0340 ,PIRQVEC+2 sAT PRIORITY 

RO sPOINT THRU PRIORITIES FOR Q22B8E 
@PTRQT ,R4 ;POINTER T "Ss 
CSR1,R3 300 FOR FIRST eee 
0300, ;START WITH CPU PRIORITY AT 7 
2% 300 FIRST ONE 
040 ,R2 sLOWER CPU PRIORITY 
0340 :RAISE PRIORITY TO 7 
(R4)+,PIRO ;SET PRIORITY FOR PIROQ'S 
PC,Q22INT sINITIALISE Q22BE TO INTERRUPT 
(RO)+, @CSR2 3SET DONE BIT 
R2 ;LOWER PRIORITY 
+124 ;PIRQ'S DON'T TAKE OVER BIRQ'S 
(0 sCLEAN UP STACK 
S$ :BRANCH AROUND PIRQ INTERRUPT 
(SP 20 ICLEAN UP STACK 
€140,R2 ;PRIORITY 3 LAST ONE? 
1$ ;IF NOT BRANCH 
PIRQ ;CLEAR ANY REQUESTS 
100000 , 40000 , 20000 , 10000 ;PIRQ'S<7-4> 


SERERERRRDESERIGERE Of 
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TEST - POWER DOWN TEST 
20834 
20635 
20836 
20837 
20838 
20839 
2084 
208641 
208643 
20844 
20645 
20647 
20848 
20849 


HE 


; 


12 005726 
123354 013737 001160 


F1i5 
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-SBTTL TEST 


- POWER DOWN TEST 


sUSING te THIS TEST WILL CHECK THAT ON POWER DOWN CONDITION IF 


sPOWER CODE 00 IS SELECTED THE CPU TRAPS THRU 24 
sROUTINE TEST 
IF UFD OR POWER UP CODE 00 NOT SELECTED THEN 


EXIT TEST 


ENDIF 

SET 24 TO POINT TO TEST AREA 

LET CSR2<5> = #1 TO NEGATE BPOK 
IF NG TRAP TO 24 THEN 

; ERROR IN POWER DOWN CYCLE 


ssIF NOT, EXIT TEST 


sUFD MODE? 
sAT LEAST ONE Q22BE FOUND? 


sSAVE POWER UP VECTOR 
;POINT NEW TO PROGRAM 
sAT PRIORITY 7 
300 POWER DOWN 


sCLEAR POWER DOWN BIT 
3sNO POWER DOWN TRAP 
3;SKIP RESTORING STACK 
sCLEAR POWER DOWN BIT 
sRESTORE STACK POINTER 


ENDIF 
IF TRAP TO 24 THEN 
. LET CSR2<5> = 60 
ENDROUT INE 
§  PSSOSSSEESSESESESSSESESEOESSSERESSEEESSEDESESEESESEOEEEEEEESS 
TST64: SCOPE 
BIT @8ITO7 ,@e52 
BNE TST65 ssEXIT TEST IN UFD 
TST CSR1 
BEQ TST65 
MOV PUWRVEC , $ TMP 
MOV #1¢ ,PURVEC 
MOV 0340 , PWRVEC +2 
MOV @BITOS,aCSR2 
byl 
CLR esRe 
ERROR +125 
BR 2s 
1%: CLR ecsRe 
TST CSP )-« 
TST (SP )-« 
2s: MOV $TMPO , PURVEC 


sRESTORE POWER VECTOR 
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- ARBITRATION BETWEEN DIFFERENT LEVELS OF INTERRUPTS 


TEST 


.SBTTL TEST - ARBITRATION BETWEEN DIFFERENT LEVELS OF INTERRUPTS 
sIF TWO Q22BE ARE AVAILABLE, THIS TEST WILL CHECK THAT HIGHER LEVEL 
s INTERRUPT REQUESTS TAKE PRIORITY OVER LOWER LEVEL ONES 
sROUTINE TEST 
te IF UFD OR 2ND Q22BE NOT AVAILABLE THEN 
i. EXIT TEST 
3 ENDIF 
; bo FOR PRIORITY_LEVELS FROM 4 TO 6 
: SET UP IST Q@22BE TO INTERRUPT AT PRIORITY_LEVEL 
i. ‘ SET UP 2ND Q22BE TO INTERRUPT AT PRIORITY_LEVEL+1 
i. . SET UP CPU PRIORITY TO PRIORITY_LEVEL-1 
i. . IF INTERRUPTS FORM 1ST Q22BE HAPPENED BEFORE 1ST THEN 
: : ERROR 
Bis . ENOIF 
3. ENDDO 
3 ENDROUT INE 
FY ECS ESHHESESEREEHETEESSHELACHERAHEEHEHEEHEHKEAKEEHEASEHESHHARTEHBHAREE 
TST65: SCOPE 
BIT @8IT07, 9052 sUFD MODE? 
BNE TST66 ssIF SO, EXIT TEST 
TST csRi2 sSECOND Q22BE AVAILABLE? 
ONE 1% sIF YES, GO 0O TEST 
Je s€0P s;OTHERWISE, GOTO EOP 
H 
; INITIALISE VECTORS FOR Q22BE'S 
b 
1s: MOV 04%, @VQBE1 ;VECTOR FOR 1ST ONE 
MOV 0340, BVOPR1 3AT PRIORITY 7 
MOV 05% , @VQBE2 ;VECTOR FOR 2ND 
MOV 340, BVOPR2 3AT PRIORITY 7 
MOV $Q22EN+2,RO sPOINTER FOR Q22BE BR’S 
MOV 240 ,R2 3CPU AT 5 
BR 3% :;START DOING ARBITRATION 
Hy 
; 00 FOR CPU PRIORITIES 5-3 
. 
2s Sue 040 ,R2 ;LOWER cpu PRIORITY 
3$ MTPS e 3CPu AT 7 
MOV CSR12,R3 3Q228E 2 AT HIGHER BR 
JSR PC ,Q22INT sIMITIALISE TO INTERRUPTS 
MOV (RO), @CSR2 sSTART 1ST ONE 
MOV CSR1,R3 3Q22BE 1 AT LOWER BR 
TST -(RO) ;sMIGHER PRIORITY 
JSR PC ,Q22INT ; INITIALISE 
MOV (RO)+, @CSR22 s;START 2ND ONE 
MTPS R2 ;LOWER CPU PRIORITY 
NOP ;WAIT A WHILE 
NOP 
NOP 
4s; ERROR +126 sINTERRUPTS IN WRONG ORDE 
TST (SP)- sRESTORE STACK 
TST (SP )+ 
aR 6% 
5$: TST (SP )+ ;sRESTORE STACK 
TST (SP) 
6%: CMP 140,R2 sPRIORITY 3 LAST? 


PR reais ten eo SUNhIne! ©. Oo - Be seen 
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TEST - ARBITRATION BETWEEN DIFFERENT LEVELS OF INTERRUPTS 


20928 123542 001542 BNE 2s ;IF NOT, BRANCH TO CONTINUE 


SEQ 0396 


————— - _ ee ee + +. ee -—-~ - | ee ee — 
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TEST 


- PMG COUNTER 


012777 


003032 


-SBTTL TEST - PMG COUNTER 
USING 2 Q22BE THIS TEST WILL VALIDATE THAT PMG COUNTER IS REALLY 
: CAPABLE OF GRANTING CPU BUS MASTERSHIP WHEN DMA REQUESTS ARE STILL 


sPENDING. 

i ROUT INE TEST 

IF UFD OR NO 2ND Q22BE THEN 
EXIT TEST 


ENDIF 
SET PMG COUNT TO SOME VALUE 
PROGRAM BOTH QG22BE TO INTERRUPT AT THE oe je 


DETERMINE WHICH HAS HIGHER PRIORITY ON THE 
PROGRAM Q22BE — ~ ty ey tl TO 00 HOG MODE 


2ND ONE 00 CLE 
CACHE INSTRUCTION THAT WILL STOP 2ND DMA 
INITIATE BOTH DMA CYCLES 
STOP 2ND OMA (RESET IS “STOLEN” CPU BUS CYCLE) 
2ND OMA HAPPENED THEN 


IF 
END 

CLEAR PMG COUNT 

PROGRAM Q22BE HIGHER PRIORITY TO DO HOG MODE 
PROGRAM 2ND ONE TO DO A CY 


STOP 2ND OMA (CLEARING OF CSR2<0> IS “STOLEN” CPU BUS CYCLE) 
IF 2ND OMA DIDN'T HAPPENED THEN 


ERROR 
ENDIF 
ENDROUTINE 
POET IIIT iiiiiitiirittitiitiitrirritirititiiiriiit itty 
TST66: a 
TST CCHPAS sHAVE DONE ENOUGH INCLUSIVE PASSES? 
BNE 99% 3; NOT YET 
NOP 3; DEBUG AID 
Jp 11% ; YES SKIP THIS 
99%: woP 
BIT #BIT0O7 ,9e52 3 UF ? 
BE 00¢ 3sIF NOT, CONTINUE 
JP sEOP 3;EXIT 
100%: TST CSRi2 s SECOND os, AVAILABLE? 
BNE 110% sIF YES, GO DO TEST 
JP sEOP sOTHERWISE, GOTO EOP 


i 
s DETERMINE WHICH Q22BE IS CLOSER TO CPU BY DOING DATO 
3 THE CSR1 OF THE ONE WITH HIGHER PRIORITY IS IN R4, THE SECOND IN R2 


é 
1108; + acsRe ;CLEAR JUST IN CASE 


acsrRe2 
MOV @TEMP ,aBA sADDRESS TO BE USED 
MOV OTEMP , BBA] sFOR BOTH OF THEM 
MOV 0177777, aWC 300 FOR 1 WORD 
MOV 0177777,awCe sIN BOTH Q22BW'S 
MOV #12525, @ODATA sDATA FOR 1ST 
MOV 52525, BDATA2 sDATA FOR 2ND 





+e" 
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SEQ 0396 | 
TEST - PMG COUNTER 
20987 123670 012777 001601 056766 MOV #1601,8CSR1 31 DATO FOR 1ST | 
20988 123676 012777 001601 057000 MOV #1601,aCSR1i2 sAND 2ND 
20989 123704 012777 000001 056770 MOV #1,8SIMGOA 380TH GO 
20990 123712 105777 056746 1%: TSTB acsRi sFIRST DONE? 
20991 123716 100375 BPL 1$ 3IF NOT, WAIT 
20992 123720 105777 (56760 2s: TSTB acsRi2 sSECOND DONE 
20993 123724 100375 BPL 2s sWAIT FOR 2ND 
20994 123726 022737 052525 002740 CMP #52525, TEMP sSECOND FINISHED LAST? 
20995 123734 001405 BEQ 3% sIF SO, BRANCH 
20996 123736 013704 002704 MOV CSR12,R4 + SECOND ONE AT HIGHER LEVEL 
20997 123742 013702 002664 MOV CSR1,R2 IFIRST AT LOWER 
20998 123746 000404 BR as :00 PMG PART 
20999 123750 013704 002664 3$: MOV CSR1,R4 s=IRST ONE AT HIGHER LEVEL 
= 123754 013702 002704 MOV CSR12,R2 sSECOND AT LOWER 
21001 3 
Sr 3; INITIATE DMA CYCLES TO WORK WITH PMG COUNTER 
2i 8 
21004 123760 013737 177520 002730 4%: MOV BCSR , SAVBR sSTORE BCSK REGISTER 
21005 123766 012700 000001 MOV #BITOO,RO 3FIRST VALUE FOR PMG 0.4MSEC 
21006 123772 050037 177520 5%: BIS RO,BCSR ;CHANGE PMG CONUTER 
21007 123776 005737 124100 TST 6% S CACHE RESET T'ITRUCTION 
21008 124002 005737 124102 TST 6$+2 3AND THE FOLLOWING FEW 
21009 124006 005737 124104 TST 64-4 5 
21010 124012 005737 124106 TST 6$+6 5 
21011 124016 012714 001407 MOV #1407 , (R4) sOATI IN HOG MODE FOR HIGHER ONE 
21012 124022 005064 006002 CLR 2(R4) ;CLEAR CSR2 
21013 124026 012764 002740 000004 MOV OTEMP ,4(R4) sADORESS TO START DATI 
21014 124034 012764 000000 000006 MOV #0 ,6(R4) 300 128 DATI’'S IN HOG MODE 
21015 124042 012712 001407 MOV #1407, (R2) 3sDATO FOR LOWER LEVEL ONE 
21016 124046 005062 000002 CLR 2(R2) ;CLEAR JUST IN CASE 
21017 124052 012762 002740 000004 MOV OTEMP ,4(R2) sUSE THE SAME ADORESS 
210186 124060 012762 177777 000006 MOV 4177777 ,6(R2) 300 JUST ONE DATO 
21019 124066 005062 000010 CLR 10(R2) sCLEAR DATA OF OND Q22BE 
21020 124072 012762 000001 000016 MOV #1,16(R2) 380TH GO 
21021 124100 000005 6%: RESET sSTOP Q22BE AT R4 
21022 124102 023762 002740 000010 CMP TEMP ,10(R2) sSECOND DMA DONE? 
21023 124110 001001 BNE 7$ sIF SET, BRANCH 
21024 124112 104127 ERROR #127 sNO CYCLE STEALING 
21025 124114 062700 000003 7%: ADO #3,RO0 300 FOR 1,3,7 IN PMG 
21026 124120 040037 177520 BIC RO,.BCSR :CLEAR PREVOIUS BITS IN BCSR 
21027 124124 022700 000007 CMP #7,RO ;LAST ONE? 
teed 124130 002320 BGE 5% ;IF NOT, BRANCH 
3 
coo 3 TRY WITHOUT PMG COUNTER OPERATING 
F 
21032 124132 042737 000007 177520 BIC @7,8CSR ;TURN OF PMG COUNTER 
21033 124140 005737 124242 TST 8s ;CACHE RESET FETCH 
21034 124144 005737 124244 TST 8$+2 3AND THE FOLLOWING FEW 
21035 124150 005737 124246 TST 6594 3 
21036 124154 005737 124250 TST 84+6 3 
21037 124160 012714 001407 MOV #1407, (R4) sDATI IN HOG MODE FOR HIGHER ONE 
21038 124164 005064 000002 CLR 2(R4) ;CLEAR CSR2 
21039 124170 012764 002740 000004 MOV OTEMP ,4(R4) sADDRESS TO START DATI 
21040 124176 012764 000000 000006 MOV #0 ,6(R4) 300 128 DATI'S IN HOG MODE 
21041 124204 012712 001407 MOV #1407, (R2) ;DATO FOR LOWER LEVEL ONE 
21042 124210 005062 000002 CLR 2c(R2) ;CLEAR CRS2 OF OND 


21043 124214 012762 002740 000004 MOV @TEMP ,4(R2) ;USE THE SAME ADDRESS 





COKDACO 
TEST 


KDJ11-8 CLUSTER DIAG. 

- PMG COUNTER 

124222 012762 177777 

124230 005062 000010 

124234 012777 000001 
000005 


124242 
124244 023762 002740 


10412 
124256 013737 0027350 
000240 
124266 000137 135446 
124272 123727 001220 
124302 005737 003032 
001402 
124310 005337 003032 
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SEQ 0399 
000006 MOV 4177777 ,6(R2) 300 JUST ONE DATO 
CLR 10(R2) sCLEAR DATA OF 2ND Q22BE 
056440 MOV #1,8SIMGOA 380TH GO 
8$: RESET sIF NOT WORKING, STOPS 2ND 
000010 CMP TEMP ,10(R2) 32ND DMA HAPPENED? 
BEQ 9% :IF YES, BRANCH 
ERROR +127 sIN PMG COUNTER 
177520 9%: MOV SAVBR ,BCSR sRESTORE BCSR 
118: NOP 
JMP $E0P 
000001 VIREOP: Hy ne ; IF NOT APT, DON’T WORRY ABOUT 
3 
hia + tte ; MAINTAIN CACHE ROUTIN PASCNT 
DEC CCHPAS 
. an _— VIREOP ROUTINE TO PROVIDE COMMON END OF PASS EXIT POINT 


~ti5 
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GLOBAL ERROR MESSAGES 


21065 
21066 124316 
124 


21067 124352 
21068 124364 


21069 124376 


21070 124436 


21071 124471 


21072 124534 
124 


124553 


-SBTTL GLOBAL 


EM1: 


EMS: 


EM6: 


EM7: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


ERROR MESSAGES 
/BASIC INSTRUCTION SET ERROR/ 


/¥MU ERROR/ 


/FPP ERROR/ 


ZERROR IN READ-WRITE BITS OF CCR/ 


/FORCE MISS WRITES TO CACHE/ 


/FORCE MISS WRITE INVALIDATES CACHE/ 


/UNEXPECTED PARITY INTERRUPT/ 


7 M15 "ae 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 56-1 


GLOBAL ERROR MESSAGES 


124556 111 116 124 
124561 105 iss 122 


124564 125 124 
124567 000 
21073 124570 124 101 107 EM10: .ASCIZ /TAG PARITY ERROR/ 
124573 040 120 101 
124576 122 111 124 
124601 131 105 


1 
21074 124611 104 pas) 124 ©EM11: -ASCIZ /DATA PARITY ERROR/ 


2107S 124633 114 117 127 EMil2: -ASCIZ /LOW BYTE PARITY ERROR/ 


105 122 
124655 122 117 122 
124660 000 
21076 124661 110 111 107 EM13:  .ASCIZ /HWIGH BYTE PARITY ERROR/ 
124664 110 040 102 
124667 131 124 105 


21077 124710 105 122 122 EM14: -ASCIZ /ERROR IN DATA PATH/ 


21078 124733 106 117 122 EMIS: -ASCIZ /FORCE MISS READS FROM CACHE/ 


124744 123 122 
124747 105 101 
124752 123 106 
124755 122 117 115 
124760 040 103 101 
124763 103 110 


000 
21079 124767 106 117 = EM16: -ASCIZ /FORCE MISS READS FROM CACHE AND MISS/ 





Ni5 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 58-2 
GLOBAL ERROR MESSAGES 


21060 


21081 


21062 


21083 


21064 


EM17: 


EM20: 


EM21: 


EM22: 


EM23: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


\ERROR IN RECORDING HITS IN HIT/MISS\ 


/WRITE BYTE ALLOCATES CACHE/ 


/WRITE BYTE HIT DOES NOT RECORD HIT/ 


/BYTES REVERSED ON WRITE CYCLES/ 


/CONDITIONAL BYPASS DOESN'T INVALIDATE CACHE/ 


SEQ 0402 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 
GLOBAL ERROR MESSAGES 


21085 


21086 


21087 


21068 


21069 


122 EMSO: 


EM27: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


B16 


16:38 PAGE 58-5 


/HITS RECORDED AFTER FLUSHING CACHE/ 


/BYPASS DOESN’ T INVALIDATE CACHE/ 


/MSER DOES NOT CLEAR ON WRITE REFERENCE / 


/PARTTY ERROR DON'T CAUSE A MISS/ 


/PARTTY ERROR DON'T SET MSER WITH CCR<7>=0/ 


SEQ 04035 


C16 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-64 16:38 PAGE 56-4 


21090 


21091 


21092 


21093 


21094 


EM34 ; 


EMSS: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


/PARTTY ERROR IGNORED/ 


/PARITY ERROR IGNORED ON LOW BYTE/ 


/PARITY ERROR IGNORED ON HIGH BYTE/ 


/PARITY ABORT LOGIC DOESN'T WORK/ 


/MSER NOT SET PROPERLY/ 


SEQ 0404 


‘ 
eee eee a 
- 


D16 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 16-OCT-84 16:38 PAGE 58-5 


21095 126015 120 101 122 EMS6: .ASCIZ /PARITY INTERRUPT LOGIC DOESN'T WORK/ 
126016 111 124 131 
126021 111 116 
124 105 122 
126027 122 125 120 
126032 1 040 114 


126054 000 
21096 126057 116 130 115 EM37: -ASCIZ /NXM AND PARITY ABORT DIN’ T HAPPEN/ 


126065 104 120 
126070 101 122 111 
126073 124 131 

126076 101 102 117 
126101 


000 
21097 sheoee 120 101 122 EM40: -ASCIZ /PARITY ABORT NOT BI.OCKED BY NXM TRAP/ 


126132 117 1 
126135 040 116 117 
126140 124 102 


21096 126166 115 125 1 EM41: -ASCIZ /MUALTI-PROCESSOR HOUK INSTRUCTION DOESN’ T CAUSE MISS/ 


32 123 116 047 
126235 124 040 103 
101 125 123 

126243 105 040 115 


SEQ 0405 


E16 


COKDACO KDJ11-B8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 58-6 
GLOBAL ERROR MESSAGES 


21099 


21100 


21101 


21102 


21103 


000 
105 122 
117 122 
111 116 
120 101 
111 124 
0 114 
107 111 
000 
105 122 
117 122 
111 116 
103 101 
110 105 
104 101 
101 
101 115 
000 
105 222 
117 122 
111 116 
116 130 
040 111 
040 
101 116 
101 114 
116 105 
115 117 
105 000 
105 122 
117 122 
111 116 
105 
117 122 
111 116 
040 110 
124 
124 110 
117 125 
110 040 
111 124 
115 111 
123 
105 107 
123 124 
122 000 
110 111 
103 117 
104 105 
040 106 
122 040 
040 114 
103 101 
111 117 
124 
101 124 


EM4e: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ /HIT RECORDED FOR A LOCATION THAT SHOULD NOT BE IN CACHE/ 


ZERROR IN PARITY LOGIC/ 


ERROR IN CACHE LATA RAMS/ 


ZERROR IN NXM IN STANDALONE MODE/ 


\NERROR IN RECORDING HITS THROUGH HIT/MISS REGISTER 


SEQ 0406 


Fi6 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:36 PAGE 58-7 
GLOBAL ERROR MESSAGES 


126522 
126525 124 
126530 105 
126535 116 
126536 101 
126541 105 
21104 126545 115 
126546 123 
126551 105 
S54 122 
126557 104 
126562 117 


126573 1 
126576 116 
126601 110 
126604 
126607 117 
126612 104 
126615 105 
126620 116 
126623 101 
126626 105 
21105 126630 105 
126633 117 
126636 111 
126641 124 
126644 040 
126647 117 
126652 000 
21106 126653 105 
126656 117 
126661 
126664 
126667 101 
126672 127 
126675 124 
126700 102 
126703 123 
21107 126705 105 
126710 117 
126713 111 
126716 102 
126721 122 
126724 105 
126727 055 
126732 111 
126735 040 
126740 124 
21108 126743 122 
126746 105 
126751 104 
126754 123 


EMS3: 


-ASCIZ /MISS RECORDED FOR A LOCATION THAT SHOULD BE IN CACHE/ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


ZERROR IN TAG STORE/ 


ZERROR PCR READ-WRITE BITS/ 


ERROR IN BCSR READ-WRITE BITS/ 


/RESET DOESN'T CLEAR BCSR<4>/ 


SEQ 0407 


COKDACO KDJ11-B CLUSTER DIAG. MACRO Mi200 18-OCT-84 
GLUBAL ERROR MESSAGES 


1 
21109 
12 


127027 122 
7032 115 
21110 127035 103 110 
7040 103 113 
127043 115 
127046 105 122 
127051 117 
127054 111 116 
127057 070 055 
127062 111 124 
127065 122 117 
127070 000 
21111 127071 124 111 
127074 105 117 
127077 124 040 
127102 105 101 
127105 111 116 
127110 114 
127113 123 
21112 127115 114 113 
7120 074 060 
127123 076 040 
127126 117 105 
127131 116 
127134 124 
127137 105 103 
127142 115 105 
127145 061 000 
21113 127147 127 122 
127152 124 105 
127155 122 105 
127160 105 
127163 116 103 
127166 104 
127171 105 123 
127174 047 124 
127177 103 114 
127202 101 122 
7205 114 113 
127210 074 
127213 076 000 
21114 127215 111 114 
127220 105 107 


EMS4; -ASCIZ 


EMSS: .ASCIZ 


EMS6: .ASCIZ 


EMS7: .ASCIZ 


EmM60: .ASCIZ 


EM61; -ASCIZ 


G16 


16:38 PAGE 58-8 


/CHECKSUM ERROR IN 16-BIT ROM / 


/CHECKSUM ERROR IN 8-BIT ROM/ 


/TIMEOUT READING LKS/ 


/LKS<07> DOES NOT BECOME 1/ 


/WRITE REFERENCE DOESN'T CLEAR LKS<07>/ 


ZILLEGAL LKS INTERRUPTS/ 


SEQ 0408 


COKDACO KDJ11-8 CLUSTER DIAG. 
GLOBAL ERROR MESSAGES 


12 
21115 127244 120 122 
1 os 


000 
21116 127315 114 113 
127320 040 122 


000 
21117 thang 127 


127404 

211186 127405 114 113 
127410 040 111 
127413 124 105 
127416 122 125 
127421 124 123 
127424 110 101 
127427 120 1 
127432 040 101 
127435 040 127 


12 
21119 ieaae 102 103 


H16 


MACRO M1200 16-OCT-84 16:38 PAGE 58-9 


117 EM62: -ASCIZ /PROCESSOR INTERRUPTS DON’T CLEAR LKS<07>/ 


123 E€M63:  .ASCIZ /LKS READY DOESN'T GO LOW/ 


+h EM64 : -ASCIZ /WRONG NUMBER OF LKS INTERRUPTS/ 


123 EM6S: -ASCIZ /LKS INTERRUPTS HAPPEN AT WRONG PRIORITY/ 


123. EM66: .ASCIZ /BCSR<12> DOES NOT DISABLES LKS/ 


SEQ 0409 


COKDACO KDJ11-B CLUSTER DIAG. MACRO M1200 18-OCT-84 
GLOBAL ERROR MESSAGES 


21120 


12 
21121 
12 


21122 


21123 


21124 


21125 


127471 


127731 


102 103 123 EM67: -ASCIZ 


124 123 

105 124 040 

114 113 123 

074 060 

076 000 

122 105 123. EM70: i «.ASCIZ 


122 105 123. EM71: .ASCIZ 


040 103 
114 105 101 
040 114 
113 123 074 
060 066 076 


124 111 115 EM72: -ASCIZ 


105 122 122 +EM75: -ASCIZ 
040 


124 040 122 
105 101 104 
131 000 


122 103 123. EM74; -ASCIZ 


RAG Ate 


16:38 PAGE 58-10 


/BCSR<13> DOESN'T SET LKS<06>/ 


/RESET DOESN'T SET LKS<7>/ 


/RESET DOESN'T CLEAR LKS<06>/ 


/TIMEOUT READING SLU REGISTERS/ 


ZERROR IN XMIT READY/ 


/RCSR<7> DOESN'T BECOME 1/7 


SEQ 0410 


J16 


GOXDACO KDJ11-B8 CLUSTER DIAG. MACRO M1200 16-OCT-84 16:38 PAGE 56-11 
GLOBAL ERROR MESSAGES 


21126 


21127 


21128 


21129 


21130 


21131 


12 
127751 127 122 117 EMTS: 
1 


1 
130002 122 103 123. EN76: 
060 


130052 130 103 123. EM77: 


000 
130108 122 103 123 M100: 


1 000 
pate | 123 114 125 E101: 


1 000 
130175 122 105 123 EM102: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


/WRONG CHARACTER RECEIVED/ 


/RCSR<O7> NOT CLEARED AFTER READING RBUF/ 


/XCSR<O7> NOT SET ON RESET/ 


/RCSR<O7> NOT CLEARED ON RESET/ 


/SLU INTERRUPTS HAPPEN AT 4/ 


/RESET DOES NOT CLEAR PROPER BITS IN SLU REGISTERS/ 


SEQ 0411 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:36 PAGE 58-12 
GLOBAL ERROR MESSAGES 


1 
21132 ieace 124 122 tt EM10%: .ASCIZ /TRANSMIT INTERRUPT DOES NOT CLEAR XCSR<07>/ 


130265 111 
130270 111 116 124 
130273 105 122 


<t Somengeian 


30326 067 076 
130331 000 
21133 130332 122 105 103 EM104: .ASCIZ /RECEIVE INTERRUPTS DON'T CLEAR RCSR<07>/ 
130335 105 111 126 
1 105 111 
130343 116 124 105 
122 122 


21134 130402 102 122 en EM105: .ASCIZ /BREAK CONDITION DOES NOT SET RBUF PROPERLY/ 





COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 56-15 
GLOBAL ERROR MESSAGES 


000 
21135 130455 122 102 = EM106: .ASCIZ /RBUF <15-11> WASN'T CLEARED ON NEXT CHARACTER/ 
1 


130471 127 101 
130474 123 116 047 
130477 124 103 


1 
21136 ‘tenes 123 114 125 €M107: .ASCIZ /SLU INTERRUPTS DON'T HAPPEN/ 


21137 yal 105 122 = EM1i:0: .ASCIZ /ERROR IN WRITING TO SLU REGISTERS/ 


130617 105 107 
130622 111 123 
130625 105 123 


1 
21138 teeese 106 111 = EM111: .ASCIZ /FIRST CHARACTER WAS NOT OVERRUN BY THE SECOND/ 


130653 123 116 
130656 117 124 040) 
130661 117 105 





M16 


COKDACO KDJ11-B8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 56-14 
GLOBAL ERROR MESSAGES 


21139 


21140 


1 
21141 
1 


1 
21142 
1 


130707 
130712 


EMil2: 


EM113: 


EM114: 


EM115: 


EM116: 


-ASCIZ /OVERRUN CONDITION DOES NOT SET PROPER BITS IN RBUF/ 


-ASCIZ /OVERRUN BITS WERE NOT CLEARED ON THE NEXT CHARACTER/ 


-ASCIZ \ERROR ON XCSR<2>\ 


-ASCIZ /ERROR IN TAG STORE FROM STANDALONE MODE/ 


-ASCIZ /OMA TAG PARITY DOES NOT GENERATE PROPER RESPONSE/ 


GOKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 16-OCT-84 16:38 PAGE 56-15 


Bl 


GLOBAL ERROR MESSAGES 


1 
21144 
1 


1 
21145 
1 


1 
21146 


131421 


111 116 040 EM121: .ASCIZ /IN BLOCK MODE ON WRITE DMA HITS NOT EVERYTHING IS INVALIDATED/ 


seg 0415 
! 
' 
107 1 
101 ill 
12a 131 
104 117 105 
123 116 
117 124 
107 105 116 
105 122 101 
124 105 
120 122 117 
120 105 
040 122 105 
123 120 117 
‘116 123 105 
115 123 105 €M117: .ASCIZ /MSER<13>NOT SET IN STANDALONE MODE/ 
122 074 061 
063 076 116 
117 124 040 
123 105 
040 111 116 
040 123 
101 116 104 
101 114 117 
116 105 
115 117 104 
105 000 
104 115 101 €M120: .ASCIZ /OMA WRITE HITS DON'T INVALIDATE CACHE, 
040 127 122 
111 105 
110 111 
123 
104 117 116 
047 124 
111 116 
101 114 111 
104 101 
105 040 103 
101 103 110 
105 000 
116 127 

122 111 124 

105 040 104 

115 101 040 

110 111 124 

123 040 116 

117 124 040 
105 126 105 


C1 


COKDACO KDJi1-8 CLUSTER DIAG. MACRO M1200 16-OCT-64 16:38 PAGE 56-16 
GLOBAL ERROR MESSAGES 


1 
21147 


1 
21148 
1 


1 
21149 
1 


1 
21150 
1 


1 
21151 
1 


101 EMi22: 


enMi23: 
116 
062 
105 
115 
103 
114 
000 
111 EM124: 
O40 i111 
124 105 
122 125 
124 123 
104 117 
047 
124 101 
105 040 
122 111 
122 111 
131 040 
126 105 
040 121 
102 125 
O40 111 
124 105 
122 125 
124 123 
117 040 EM125: 
117 127 
122 040 
117 127 
124 
101 120 
124 117 
062 O64 
117 103 
125 
122 122 €M126: 
122 040 
i17 111 
107 040 
062 062 


SEG 0416 


-ASCIZ /READ DMA HIT IS WRONG/ 


-ASCIZ /ERROR IN QG22BE DMA CYCLES/ 


-ASCIZ /PIRQ INTERRUPTS DON'T TAKE PRIORITY OVER @ BUS INTERRUPTS/ 


-ASCIZ /NO POWER DOWN TRAP 10 24 OCCUR/ 


-ASCTZ /ERROR DOING Q22BE INTERRUPTS/ 


D1 
COKDACO KDJ11-B CLUSTER DIAG. MACRO M1200 18-OCT-84 16:36 PAGE 56-17 
GLOBAL ERROR MESSAGES 


SEQ 0417 


131667 102 105 040 
131672 111 116 

131675 105 122 122 
131700 1 120 lea 
131703 123 000 

21152 131705 105 122 122 EM127: .ASCIZ /ERROR IN OPERATION OF PMG COUNTER/ 
131710 117 122 040 
131715 111 116 040 
131716 117 120 105 
131721 101 124 
131724 111 117 116 
131727 040 117 106 
131732 120 115 
131735 107 040 103 
131740 117 125 116 
131743 124 105 122 
131746 000 
21153 131747 125 116 105 €M130: .ASCIZ /UNEXPECTED TRAP TO 4/ 

131752 130 120 105 
131755 103 124 105 
131760 104 124 
131763 101 120 
131766 040 117 


1 000 
21144 pple 105 = EM131: .ASCIZ /ERROR WRITING TO LKS<6>/ 


132021 076 000 

21155 132024 105 122° 122 EM132: .ASCIZ /ERROR IN MAINTENANCE REGISTER/ 
132027 117 122 040 
132032 111 116 040 


1 05 122 
21156 po 105 105 EM133: .ASCIZ /EEROM TYPE ERROR/ 


000 
122 
040 
105 
117 
21157 ote 122 105 tt EM134: .ASCIZ /READ OR WRITE EEROM ERROR/ 
127 
124 
105 
117 


El i | 
COKDACO KDJ11-B8 CLUSTER DIAG. MACRO M1200 18-OCT-64 16:38 PAGE 58-16 | 
SEQ 04 
GLOBAL ERROR MESSAGES 18 | 
21158 
S1189 132185 040 «=124~=Ss«10S.-:«OM1: ~—C ASCII. / TEST ERROR/<15><12> 
132140 123 «124 ~—sOOL 
132143 105 122 ~&»# 122 
132146 4117+«122—~Cté«CS 
132151 012 
21160 132152 04003 -ASCIZ / @ ~~ PC/ 
132185 011 040 #120 
132160 103 000 
21161 132162 040 124 105 O64: ASCII / TEST ERROR EXPCTED RECEIVED/<15><12> 
132165 123 128 O11 
132170 1 122-122 
132173 117 122 ~»©O11 
13217% 105 130 4120 
132201 103 124 105 
132206 «4108 «= 01.—S—éi 2D 
132207 (105 108 ~—— 105 
132212 111.'s«i126s—i(i«i08S 
132215 104 015 O12 
21162 132220 040 4 040——t—«éS \ASCIZ / @ PC DATA _——DATA 
132228 011 040 #120 
322206 42«108-'i‘id(C(t;‘é‘éi 
132231 108 101 #126 
132234 101 040 040 
132237 0400—«(40 
132242 +108 «©1101 ~—Ss 128 
132245 101 000 
21163 132047 040 124 105 DMS: ASCII / TEST ERROR HITMIS DATA IN DATA IN/<15><12> 
132252 123«(124~—Ss«OAD 
132255 105 122°» 4122 
132260 (117~+«122—~Sté«Oid2zS 
132263 110 111 °« 4126 


132305 101 111 
132310 116 015 012 
21164 1323135 040 040 043 -ASCIZ / @ PC REG. CACHE MEMORY/ 
132316 011 120 
132321 103 011 040 


1 
21165 oiene 040 124 105 OH7; -ASCII / TEST ERROR ADDRESS MSER/<15><12> 





COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 16-OCT-84 


21167 


21168 


21169 


21170 


21171 


21172 


21173 


BESS SERERREREES 


~ 
ge 


BREE 


OH43; 


-ASCIZ 


-ASCIZ 


-ASCII 


-ASCIZ 


- ASCII 


-ASCIZ 


-ASCII 


16:38 PAGE 56-19 


4 @ PC ACCESSED/ 


/ TEST ERROR WNUMBER/<15><12> 


4/@ PC OF HITS/ 


\ERROR ERROR MSER HIT/MISS\<15><12> 


/ TEST ERROR INSTRUCTION/<15><12> 


/ TEST ERROR EXPECTD RECEIVD CACHE/<15><12> 





COKDAC® KDJ11-8 CLUSTER DIAG. 


132642 015 012 
21174 132644 04 040 

132647 011 

132652 103 011 

132655 101 


132674 j/ aaa 
132677 116 

21175 132701 040. 2:12 
132704 123 ies 


1 
21176 po they 040 


132747 062 061 
132752 061 066 
132755 011 
132760 061 
132763 060 076 
21177 132766 040 124 
132771 123 124 
132774 105 122 
132777 117 122 
133002 122 
133005 117 122 


1 
21176 ott 040 


1 
21179 133032 
13 


1 
21160 teneaa 


1 
21161 feacat 


G1 


MACRO M1200 16-OCT-84 16:38 PAGE 56-20 


043 -ASCIZ / @ PC 


105 O0H47: .ASCII / TEST ERROR 


043 -ASCIZ / @ PC 


DATA DATA LOCATION/ 


ADDRESS ADORESS/<15><12> 


<21-16> <15-0>/ 


105 OH6S: .ASCII / TEST ERROR PRIORITY/<15><12> 


043 -ASCIZ / @ PC LEVEL/ 


105 OH72: .ASCII / TEST ERROR 


ADORESS/<15><12> 


043 -ASCIZ / @ PC FAILED/ 


105 OH105: .ASCII / TEST ERROR RBUF/<15><12> 


SEQ 0420 


COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 58-21 


133107 117 122 011 
133112 122 102 125 
133115 106 a4 012 


21162 133120 040 043 
331235 011 120 
133126 103 000 
21183 133130 040 124 105 OH115: 
133135 123 124 011 
133136 105 122 
133141 117 011 
133144 115 123 105 
133147 122 011 101 


133160 015 012 

211864 133162 040 043 
133165 011 040 120 
133170 103 040 011 


1 
21185 potted 040 124 105 OH134: 


133216 117 011 
133221 043 
133224 117 106 011 
133227 011 040 040 
133232 040 104 101 
133235 124 101 
040 103 

133243 122 040 
133246 040 101 104 
133251 104 122 105 
133254 123 123 015 
133257 012 

21186 133260 040 040 043 
133263 011 040 120 
133266 103 040 011 
133271 105 122 122 
133274 117 122 123 
133277 040 120 
133302 101 124 124 
133305 105 122 116 
133310 040 040 040 
133313 040 122 105 
133316 101 104 040 
133321 040 040 
133324 040 040 040 
133327 040 101 103 
133332 103 105 123 
133335 123 105 104 
133340 

21187 


21168 
21169 133342 001162 001116 000000 DT1: 


-ASCIZ 


-ASCII 


-ASCIZ 


-ASCITI 


HI 


4 @ PC/ 


/ TEST ERROR MSER ADORESS/<15><12> 


/ TEST ERROR 


-ASCIZ / @ PC 


-EVEN 
- WORD 


$TiWP1, SERRPC,O 


ACCESSED/ 


© OF DATA PCR 


ERRORS PATTERN READ 


ADORESS/<15><12> 


ACCESSED/ 





COKDACO KDJ11-8 CLUSTER DIAG. 
GLOBAL ERROR MESSAGES 


21190 
21191 
21192 
21193 


21194 1 


21195 
21196 
21197 
21198 
21199 
21200 
21201 
21202 
21203 


21204 1 


21205 


21206 1 
21207 1 


21206 


21209 
21210 


001116 
001116 
ooriza 
001116 
000000 
001116 
000000 
001116 
000000 
001116 
001116 
000000 
001116 
000000 
001116 
001116 
001122 
001116 
000000 
001116 
000000 
001116 
000000 
001116 
000000 
001116 
000000 
001116 


bs rare 


MACRO M1200 16-OCT-84 16:38 PAGE 586-22 


000001 OT4: 
000002 OTS: 
001122 OT7: 
001124 OT14: 
001124 OTi7: 
000003 DT24: 
177744 OT27: 
001124 OT3S: 
001126 OT41: 
000001 OT43: 
172334 OT47: 
000001 OTSO: 
001124 OTS1: 
001124 ODTS2: 
001124 DT64: 
001124 OT65: 
001124 ODT75: 
177562 07105: 


001126 07115: 
000000 


000000 01150: 
003022 01154: 
000004 


sTMP1, SERRPC .R1,CCR,O 

STMP1, SERRPC .R2,R1, $GODAT ,O 
$TMP1, SERRPC , $BDADR ,MSER ,O 
STMP1, SERRPC , SGODAT, TSTLOC 0 
STHP1, SERRPC , SGDDAT , RECDA7 ,0 
TMP 1, SERRPC ,R3,0 
STMP1, SERRPC ,MSER .R3,0 

$TMP1, SERRPC , $GDDAT ,MSER ,O 
$THP1, SERRPC , $BDDAT ,O 

¢TMP1, SERRPC .R1,RECDAT , $BDADR ,O 
TMP 1, SERRPC ,KIPARG , $BDADR ,O 
¢TMP1, SERRPC ,R1, $BDADR ,O 

TMP 1, SERRPC , SGDDAT .PCR,O 

$TMP 1, SERRPC , 4GDDAT .BCSR,.O 
$TMP1, SERRPC, $GDDAT .LKSFL .O 
$TMP1, SERRPC , $GODAT ,O 

$TMP1, SERRPC , $GDDAT , $BDDAT ,O 
$TMP1, SERRPC ,RBUF ,O 

$TMP1, SERRPC , $SBDDAT ,.KIPARG, $BDADR ,O 
$TMP1, $BDADR .O 


ce | ee - ee ee ee - — 


SEQ 0422 


¢THP1, SERRPC ,ERRCNT .R3, SBDDAT .R4, $BDADR ,O 





c— a 


—— oe ee ee ee ee ert 


Jl 
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SEQ 0423 
MODIFIED ERROR MESSAGE TYPEOUT ROUTINE 

21212 .SBTTL MODIFIED ERROR MESSAGE TYPEOUT ROUTINE 

21213 fp SSHOSESEOKKESS AHSSHOSALHESSHHREASHHESHASATASEHHE’ SHEKSHKESSHHSEOKEEHEE 
21214 s@¢THIS ROUTINE USES THE “ITEM CONTROL BYTE” CSITEMB) TO DETERMINE WHICH 
21215 s@ERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE my ~ TABLE” (SERRTB), 
21216 3@AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 
21217 78 
21218 3@THE ONLY DIFFERENCE BETWEEN THIS ROUTINE AND THE ORIGINAL “SERRTYP” FROM 
21219 ;@SYSMAC IS THAT YOU CAN PASS INFORMATION IN GENERAL PURPOSE REGISTERS TO THIS 
21220 s@ROUTINE. THE GENERAL PURPOSE REGISTERS USED ARE TO BE SPECIFIED IN DT 
21221 s@FORMAT. RO SHOULD NOT BE USED. 

21222 
21223 133672 ERTYPE: 
21224 133672 005037 001162 CLR ¢TMP1 ssJUST CLEAR IT 
21225 133676 113737 001102 001162 MOvVB STSTNM, $TMP1 ssSTORE TEST HUMBER 
21226 133704 104401 001175 TYPE .$ 33s "CARRIAGE RETURN” € “LINE FEED” 
21227 133710 010046 RO, -(SP) s3sSAVE RO 
21226 133712 005000 CLR RO ssPICKUP THE ITEM INDEX 

1229 133714 153700 001114 BISs8 Ses ITEME .RO 

21230 133720 001004 BNE is ssIF ITEM NUMBER IS ZERO, JUST 
21231 ssTYPE THE PC GF THE ERROR 
21232 133722 013746 001116 MOV SERRPC , -C SP) 3sSAVE SERRPC FOR TYPEOUT 
21233 33ERROR ADORESS 

212384 133726 104402 TYPOC 33GO TYPE--OCTAL ASCIICALL DIGITS) 
21235 133730 000426 3R 6$ 33GET OUT 
21236 133732 005300 1%: DEC RO ssADJUST THE INDEX SO THAT IT WILL 
21237 133734 006300 ASL RO 83 WORK FOR THE ERROR TABLE 
21238 133736 006300 ASL RO 
21239 133740 006300 ASL RO 
21240 133742 062700 001324 ADO @sERRTB,RO 3sFORM TABLE POINTER 
21241 133746 012037 1353756 MOV CRO)+ 2% ssPICKUP “ERROR MESSAGE” POINTER 

21242 133752 001404 BEQ 3$ 33SKIP TYPEOUT IF NO POINTER 
21243 133754 104401 TYPE 

21244 133756 2s: -WORD O 3sERROR MESSAGE POINTER GOES HERE 

21245 133760 104401 001175 TYPE . CRLF 33 "CARRIAGE RETURN” € “LINE FEED” 

1246 133764 012037 133774 3%: MOV CRO)+ 48 ssPICKUP “DATA HEADER” POINTER 
21247 133770 001404 BEQ 5% 33SKIP TYPEOUT IF 
21248 1 104401 TYPE 88 THE “DATA HE " 
21249 133774 4$: -WORD O 3 A HEADER” POINTER GOES HERE 
21250 133776 104401 001175 TYPE . $CRLF 33 "CARRIAGE RETURN” € “LINE FEED” 
21251 134002 011000 5%: MOV CRO),RO ssPICKUP “DATA Ll POINTER 

1252 134004 001004 BNE 7$ 33GO TYPE THE DATA 
21253 134006 012600 6%: MOV (SP)+,RO ssRESTORE RO 
21254 134010 104401 001175 TYPE » $CRLF 33 "CARRIAGE RETURN” € “LINE FEED” 
21255 134014 000207 RTS PC 3 sRETURN 
21256 134016 78: 
21257 134016 021027 000005 CMP ae 3 sGENERAL PURPOSE REGISTER? 
21258 134022 101021 BHI 3sIF NOT, GO TYPE DATA 
21259 134024 042737 000700 134060 BIC eeIT6:8IT7:61T6. 8s 3sCLEAR BITS FOR SOURCE REGISTER 
21260 134032 011037 001160 MOV (RO), $TMPO ssSAVE (RO) 
21261 134036 000337 001160 SWAB $TMPO 33;GET REGISTER NUMBER TO HIGH BYTE 
21262 134042 006237 001160 ASR $TMPO 33GET REGISTER NUMBER TO BITS 8-6 
21263 134046 006237 001160 ASR $TMPO 

21264 134052 053737 001160 134060 BIS sTMPO,6¢ 33SET BITS IN MOV INSTRUCTI 
21265 ssACCORDING TO REGISTER NUMBER 

21266 134060 010046 8%: MOV RO, -(SP) + MOVE ges al = REGISTER TO STACK 
21267 134062 005720 TST (RO)+ s sADVANCE PO 


21268 134064 000401 BR 10% 1160 TYPE 





COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 18-OCT-84 16:38 PAGE 59-1 
TYPEOUT ROUTINE 


MODIFIED ERROR MESSAGE 


013046 


104402 
005710 
001744 
104401 
000745 

040 


134104 


0400—s« 0 


9%: MOV 

108: TYPOC 
TST 
BEQ 
TYPE 


@CRO)+, -CSP) 


CRO) 
6$ 


BR 7$ 
118: -ASCIZ / / 
-EVEN 


ssIF NOT GPR, SAVE @(RO)+ FOR 


TYPEOUT 
33GO he ay LL ASCI (ALL DIGITS) 
NUMBER? 


s3IS THERE ANOTHER 


3:BR IF NO 
+a TYPE 1wot2) 


SPACES 


ssTWOC2) SPACES 


-SBTTL GLOBAL SUBROUTINES SECTION 


soe 
THE GLOBAL 


3 THAT ARE USED IN 


s INPUTS: NONE 

3 OUTPUTS: NONE 

3 SUBORDINATE ROUTINES USED: LOAD PARS 
LOAD PORS 


s FUNCTIONAL SIDE EFFECTS: NONE 
; CALLING SEQUENCE: 


INITMM: MOV 


$358599839595998595959% 


b 
=~ 
w 


; * FUNCTIONAL DESCRIPTION 
SUBROUTINE TO INITIALIZE ALL THE MMU REGISTERS 


#172240 ,R1 


PC, LOP 
#172260 ,R1 


PC, 
#172340,R1 
PC, 
#172360 ,R1 
#177640 ,R1 
PC, 
#177660 ,R1 
PC, 
#177600 ,R1 
PC, 

#177620 ,R1 
PC, 
#172300 ,R1 
#172320,R1 
Pc, 
#172200 ,R1 
PC, 
#172220,R1 
PC u 


JSR 


ADORESS OF 
ADORESS OF 
ADDRESS OF 
ADORESS OF 
ADORESS OF 
ADORESS OF 
ADORESS OF 
ADORESS OF 
ADORESS OF 
ADORESS OF 
ADORESS OF 
ADDRESS OF 


+ RETURN 


SUBROUTINES SECTION — THE SUBROUTINES 
MORE THAN ONE TEST 


SIPARS 
SOPARS 
KIPARS 
KDPARS 
UIPARS 
UDPARS 
UIPORS 
UDPDRS 
KIPORS 
KDPORS 
SIPORS 
SOPORS 


SEQ 0424 











ae ne ee 


Li 
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SEQ 0425 


GLOBAL SUBROUTINES SECTION 


21327 ee 
21326 ; FUNCTIONAL DESCRIPTION: 
21329 ’ SUBROUTINE TO INITIALIZE ALL THE MMU PAGE ADDRESS REGISTERS (PARS). 
21330 ; S ROUTINE WILL INITIALIZE 6 nPARS STARTING AT A BASE ADDRESS 
21331 H SUPPLIED BY THE CALLING ROUTINE. PARS 0-5 WILL BE MAPPED FROM 
21332 ; ADORESS 0 TO ADDRESS 1357777 (0-24K). PAR 6 WILL BE MAPPED FROM 
' 21333 3 ADORESS 200000 TO 217777 AND PAR 7 WILL BE MAPPED TO THE 1/0 
| 21334 3 PAGE. 
21335 
21336 3 INPUTS: 
4 s R1 CONTAINS THE BASE ADDRESS OF THE NEXT 86 PARS TO BE INITIALIZED 
21339 3 OUTPUTS: NONE 
21340 
eae 3 SUBORDINATE ROUTINES USED: NONE 
oisea 3 FUNCTIONAL SIDE EFFECTS: NONE 
po s CALLING SEQUENCE: JSR PC ,.LOPARS 
21347 134252 012702 000006 LOPARS: MOV 6, Re sLET LOOP COUNTER COUNT FIRST 6 PARS 
21348 134256 0050035 ’ CLR R3 sINITIALIZE INDEX VALUE 
21349 134260 0103521 1%: MOV R3, ee sLOAD ty” 
21350 134262 062703 000200 ADO #200, s INDEX IN 4K INCREMENTS 
21351 134266 077204 S08 R2, ts sLOAD FIRST SIX PARS 
21352 134270 012721 002000 MOV #2000, (R1)+ sLET PARG MAP TO 200000 
21353 134274 C12711 177600 MOV #177600, CR1) sLET PART MAP TO I/0 PAGE 
21354 134300 000207 RTS PC sRET 





M1 
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SEQ 0426 


GLOBAL SUBROUTINES SECTION 
21 
21357 : FUNCTIONAL yoy 
21358 ‘ SUBROUTINE TO INITIALIZE ALL THE MMU PAGE DECRIPTOR Aye: CPORS). 
21359 : THIS ROUTINE WILL INITIALIZE 8 PDRS STARTING AT A BASE ADDRESS 
21360 : SUPPLIED BY THE CALLING ROUTINE. PDORS 0-5 WILL BE INITIALIZED TO 
21361 : 4K READ/WRITE BYPASS AND PDRS 6 AND 7 WILL BE INITIALIZED 10 
21362 $ 4K READ/WRITE NO BYPASS. 
21363 ; NOTE: THERE IS NO NEED TO BYPASS ON I/0 PAGE REFERENCES BECAUSE 
SS : THE CACHE DOES NOT ALLOCATE ANY OF THESE REFERENCES. 
21366 3 INPUTS: 
at : Ri CONTAINS THE BASE ADDRESS OF THE NEXT 6 PDRS TO BE INITIALIZED 
21369 3 OUTPUTS: NONE 
21370 . 
etsee 3 SUBORDINATE ROUTINES USED: NONE 
sisva s FUNCTIONAL SIDE EFFECTS: NONE 
phy s CALLING SEQUENCE: JSR PC .LDPARS 
21377 134302 012702 000006 LOPORS: MOV «6, Re sLET LOOP COUNTER COUNT FIRST 6 PARS 
21378 134306 012721 177406 18: MOV 0177406, (R1)> sLOAD PORS WITH 4K READ/URITE BYPASS 
21379 134312 077203 SOB 1$ ;LOAD FIRST SIX PORS 
21380 134314 012721 077406 MOV @77406, (R1)+ sLET PARG BE 4K READ/WRITE NO BYPASS 
21381 134320 012711 077406 MOV #77406, (R1) sLET PART BE 4K READ/WRITE NO BYPASS ALSO 


21382 134324 000207 RTS PC sRETURN 





Ni 
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SEQ 0427 
GLOBAL SUBROUTINES SECTION 

21384 3° 
21385 | FUNCTIONAL DESCRIPTION: 
21386 : SUBROUTINE TO HANDLE PARITY ERROR ABORTS FROM THE RAM STORE RAM TESTS. 
21387 
21388 ; INPUTS: 
21389 ; MEMORY SYSTEM ERROR REGISTER CONTAINS BITS INDICATING FAILURE 
21390 
21391 ; OUTPUTS: NONE 
21 
21393 ; SUBORDINATE ROUTINES USED: NONE 
21394 
21395 ; FUNCTIONAL SIDE EFFECTS: NONE 
21397 ; CALLING SEQUENCE: CALLED BY PARITY ABORT 
21398 ; HOV 90114, SLOCOO SAVE CONTENTS OF PARITY ABORT VECTOR 
21399 ; MOV @0SPAR, 86114 LET VECTOR POINT TO PARITY ABORT ROUTINE 

3 
21401 ; (CACHE PARITY ERROR OCCURS) 
21403 134326 011637 001122 RAMPAR: MOV (SP), SBDADR :STOR ADDESS TRAPPED 
21404 134332 032737 000100 177744 BIT @BIT06, MSER IF LOW BYTE PARITY ERROR 
21405 134340 001401 BEQ 18 ; THEN . 
21406 134342 104007 ERROR +7 sERROR 
21407 134344 032737 000200 177744 18: BIT @81T07, MSER 3IF HIGH BYTE PARITY ERROR 
21408 134352 001401 BEQ 28 ; THEN 
21409 134354 104007 ERROR 67 ERROR 
21410 134356 032737 000040 177744 2%: BIT @BITOS, MSER IF TAG PARITY ERROR 
21411 134364 001401 BEQ 3$ ; THEN 
21412 134366 104007 ERROR +7 ;ERROR 
21413 134370 005037 177744 3$: CLR MSER ;INITIALIZE MSER AFTER ERROR 
21414 134374 000002 RTI ; RETURN 
21415 134376 005237 002722 LKSINT: INC LKSFL ;INCREMENT FLAG 
21416 134402 000002 RTI 
21418 .SBTTL Q22BE SIZE ROUTINE 
21419 ;THIS ROUTINE WILL AUTOSIZE FOR UP TO TWO Q@22 BUS EXERCISERS. IF NONE 
21420 ;FOUND LOCATIONS CSR1 AND CSRi2 WILL BE LEFT ZEROES. THIS ROUTINE WILL 
21421 ;ONLY RUN IN NOT UFD MODE. 
21423 134404 032737 001000 177750 @22SIZ: BI7 @81T09,MAIREG ;UNIBUS SYSTEM? 
21424 134412 001401 BEQ 18 IF NOT. ADVANCE TO ROUTINE 
21425 134414 000207 RTS PC ;OTHERWISE, RETURN 

3 
21427 ; PREPARE TO DO SIZING 

, é 

21429 134416 013701 000004 is: MOV ERRVEC.R1 ;STORE TIMEOUT VECTOR 
21430 134422 012737 134576 000004 MOV 076 ,ERRVEC ;POINT NEW TO PROGRAM 
21431 134430 012737 00034C 000006 MOV 0340, ERRVEC+2 ;AT PRIORITY 7 
21432 134436 005037 001160 CLR $TMPO YCLEAR Q22BE COUNTER 
21433 134442 012702 17 MOV 6170000 ,R2 }FIRST POSSIBLE ADDRESS 
21434 134446 012703 000510 MOV €510,R3 ;VECTOR FOR IT 
21435 134452 000404 BR 35 ;TRY THOSE VALUES 

; “ 
21437 ; NOW DO ACTUAL SIZING . 

3 A, 
21439 134454 062702 000020 2%: ADD €20,R2 ;GET CSR FOR NEXT Q228€ 
21440 134460 062703 000004 ADD 04,R3 GET VECTOR FOR NEXT ONE 





COKDACO KDJ11-8 CLUSTER 
Q228€ SIZE ROUTINE 
22441 134464 005712 


21476 134626 

21477 

214786 134630 012 
134633 
134636 105 
134641 123 
li4e44 040 
134647 122 


—_ -—-- — — ee 
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38: TST CR2) sTRY TO ACCESS CSR 
b 
3 IF NO TIMEOUT, STORE EXISTING ADDRESSES TO REGISTERS 
001160 TST sTMPO sFIRST G22BE FOUND? 
BNE at sIF SECOMD, 
mov @CSR1 RS sSTART WITH CSR1 FOR 1ST 
"OV R2,SIMGOA sSIPAUL TANEOUS GO 
000016 002702 BIO #16, SIMGOA 4 
ER S¢ sGRANCH TO INMITIALISE 
002704 4$; MOV @CSR12,RS sSTART WITH CSR1i2 FOR 2ND 
Q00004 S$: MOV ~R4 sIMITIALISE S REGISTERS 
MOV R2, (RS) sIMITIALISE 1 
000002 68: MOV (RS), 2CRS) sSTORE TO NEXT OME 
TST de sGET NEXT 
000002 AnD @2,(RS) sGET ADDRESS, POINT NEXT 
$B 68 300 FOR NEXT 4 REGISTERS 
000002 MOV RS,2CRS) 3ST INTERRUPT VECTOR 
Q00004 MOV RS ,4(RS) 3% PRIORITY 
000002 BOO 2,4 
001160 Inc e sCOUNT G228E'S 
000002 001160 Crp 02, sTHPO sTWO FOLRD? 
ar 3a sIF SO, STOP SIZING 
ba 8% 8 « CONTINUE SIZING 
8 
3 ON TIMEOUT TRY TO LOOK AT NEXT ADORESS RANGE 
i 
78: TST (SP )« sRESTORE STACK FROM 
TST (SP )- sT 
170160 Bt: Crp #170160 ,R2 3AT THE LAST POSSIBLE? 
GxE 2s 3 IF 6 
002664 9%: TST CSR1 31 F ? 
BEQ 108 sIF . BRANCH 
134630 TYPE ~ONDQ22 3s TYPE FOUND 
106: Ov R1 ,ERRVEC sRESTORE TIMEOUT VECTOR 
RTS PC sRE TURN 
015 121 OnOQ@22: .ASCIZ <12><15>/Q22BE USED DURING TESTING/ 
062 102 
630 125 
105 164 
104 
111 116 
040 
123 
116 107 
EVEN 
-SOTTL G@22BE INTERRUPT INITIALISE ROUTINE 
sTHIS ROUTINE WILL INITIALISE Q22BE TO INTERRUPT AT A PRIORITY AT (RO)+ 
sAT THE STARTING ADORESS IN RS. THE TEST HAVE TO SET ACTUAL DONE BIT 
s8Y CLEARING GO. 
Q22INT: CLR CR3) sCLEAR TRANSFER TYPE IN CSR1 
000001 BIS @BITOO,(RO) sZERO DONE 
000002 MOV (RO), 2(R3) 3SET PRIORITY IN CSR2 
000001 BIC @BITOO, (RO) sPREPARE TO SET DONE 
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Q228€ INTERRUPT 


134702 000207 


135056 011637 
135062 104150 
000002 


001122 


177600 
135166 


INITIALISE ROUTINE 


SEQ 0429 
RTS PC 
-SBTTL JMATRN DATO CYCLE THRU G228E 
sTHIS ROUTINE PERFORMS DATO FROM A ple ON TEMP THRU THE FIRST 
sFOUND G22BE STARTING AT “ey @CSR1. RO HAS O IF OMY 1 TRANSFER IS 
370 GE PERFORMED. OTHERWISE 16 BLOCK MODE TRANSFERS ARE 10 BE PERF 
3IN THE LATTER CASE ADORESS WA WORD COUNT WAS TO BE LOADED BEFORE” 
OMATRN: MOV #12525, BDATA sDATA USED 
TST RO 300 1 WORD? 
BFa is sIF VES, BRANCH 
MOV BI TO9!BI TOO, BCSR2 s6L0CK MODE, GO 
GR ¢ sBRANCH TO OO IT 
18: Ov #1601, 8CSR1 sRESET LATENCY COUNT DATO 
“OV & P sLOAD OMA ADORESS 
MOV 0177777 , at 300 1 WORD 
MOV @BIT00,8CSR2 300 IT 
2s: TSTe aC SR2 s0MA DONE? 
BPL Pa) sWAIT TILL DONE 
38: RTS PC sRETURN FROM SUBROUTINE 
-SBTTL OMARD DATI THRU G22RE 
;THIS ROUTINE PERFORMS DATI CYCLE THRU Q@22BE IN EITHER BLOCK MODE OR A SINGLE 
s TRANSFER MODE. MEMORY LOCATION USED IS TEMP. RO IS ZERO FOR SINGLE TRANSFER 
OMARD: MOV OTEMP .gBA sLOAD OMA ADORESS 
TST Ro 300 1 WORD? 
BF OQ 1s sIF YES. GRANCH 
MOV yp Ee 316 DATIB 
MOV 77770, GUC 300 6 WORD 
Mov eerT09161760, ec sRe s8L0CK MODE GO 
BR Pa) 3GO CHECK 
1%: MOV 01407 ,@CSR1 sRESET LATENCY COUNT .DATI 
3LOAD NEW DATA TO DATA R. 
MOV 0177777, uc 300 1 WORD 
MOV BI TOO, eCSR2 300 IT 
2s: TST8 ecsrR2 sO0MA DONE? 
BPL 26 sWAIT TILL DONE 
36: RTS PC sRETURN FROM SUBROUTINE 
TOUT: MOV (SP), SBOADR sSTORE TRAPPED PC 
~ 130 sUNEXPECTED TRAP 


ey GLOBAL SUBROUTINES 
4 


i 
sROUTINE TO INITIALIZE MEMORY MANAGEMENT 


3 
me; - RO, -( SP) sSAVE CONTENTS OF REGISTERS 


R1,-(SP) i 
MOV R2, -( SP) 5 
MOV #177600 ,RO i 
JSR PC .POR sINIT I AND D USER POR'S 





02002 

001002 
005066 
013737 


135210 JSR PC PAR 
135210 JSR PC PAR 
172200 MOV #172200 ,RO0 
135165 JSR PC .POR 
13521) JSR PC PAR 
135210 JSR PC .PAR 
135166 JSR PC POR 
135210 J5A PC PAR 
135210 a] PC PAR 
000027 172516 MOV 627 ,80172516 
MOV (SP )+,R2 
MOV (SP )«.R1 
MOV CSP )+,RO 
RTS PC 
i 
sROUTINE TO INITIALIZE POR'S 
3 
POR: CLR 
077406 POR1: MOV 077406 ,CRO)> 
000001 aD #1,R2 
000020 cep #16. .R2 
BNE 
RTS 
3 
sROUTINE TO INITIALIZE PAR‘S 
3 
Pag: CLR 
PAR1: MOV R1,CRO)> 
000200 Ano eR1 
001600 cep #1600 ,R1 
RE ARL 
177600 MOV #177600, (RO)-+ 
RTS 
sTIME OUT ROUTINE 
3 
ADOTRP: INC 
RTI 
sf TRAP ROUTINE 
é 
003030 000001 MMUTRP: CrP FLAG, @1 
BFQ 1 
ERROR ¢ 
1%: tOV RO, -(SP) 
177776 MOV 80177776,R0 
177764 ASH @-14,R0 
000002 CMP RO, @2 
BNE OX 
BR NOTOK 
177776 OK; MOV 90177776,RO0 
000002 ASH #2,R0 
177764 ASH 0-14, RO 
000002 CMP RO, @2 
Bwe OK1 
COON NOTOK; CLR 4(SP) 
177572 003042 OK1;: MOV 00177572, SAVMRO 


s INCREMENT TIME OUT FLAG 
sRETURN 
sARE WE = AN ABORT 


PSW 
sLOOK AT BITS<15:14> 
sWAS PS<15:14>"10 


sNO GO ON 

rYES _—— BITS TO 00 
sSAVE A COPY OF PSW 
-— AT BITS<13:12> 


seo 0430 
sINIT I USER PAR’S | 
sINIT 0 USER PAR'S 
sINIT I AND DO SUP PDR‘S 
sINIT I SUP PAR‘S 
sINIT 0 SUP PAR‘S 
sINIT I AND DO KER PDR'S 
sINIT I KER PAR‘S 
sINIT O KER PAR‘S 
sINIT MARS 
sRESTORE REGISTERS 
’ 

’ 

sRETURN 

sINIT CNTR 

sINIT POR 

s INCREMENT CNTR 

sARE WE DONE 

sGRANCH IF NOT 

RETURN 

4 a on INIT PAR 
et READY A ame PAR 
sREACHED A P 

sBRANCH IF OT 

sINIT PART 

sRE TURN 


1WAS PS<13:12>210 
NO GO 


3 
sCLEAR ILLEGAL MODE FFROM OLD PSW 
sSAVE A COPY OF MMRO 
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DMARD DATI THRU Q22BE 


21604 1353350 
35336 





013737 
013737 
005037 
005037 
012600 
o0co002e 


003044 
003046 


00177574, SAVMR1 
00177576, operate 
of 77572 


FLAG 
CSP )+,RO 


sSAVE A COPY OF MRI 

sSAVE A COPY OF MMR2 

sCLEAR ABORT BITS AND TURN MAU OFF 
sCLEAR MMU ABORT FL 

IRESTORE 0 ORIGINAL CONTENTS OF REG 0 
sRETURN 


—— —— ee + -_—— 


Fo 
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000003 
135426 


000005 
003120 


003120 


003120 


sFPP COMMON SUBROUTINES 

WLOTRP: MOV (SP )+,RO sSAVE PC 
MOV (SP)+,RS sSAVE STATUS AND RESTORE STACK 
ERROR 3 
JP CRO) 3GO BACK INLINE 


0 
ERRFP: RTS R7 
ERR; RTS R7 


sSUBROUTINE DATA VERFICATION - 
; CALLED BY JSR R7 ,DATVER 


SINPUT: (R4)*EXPECTED DATA 
5 CR1)*RECEIVED DATA 


i THIS ROUTINE VERIFIES THAT THE 4 CONSECTIVE WORDS STARTING WITH (R4) ARE 
eS ee ee THE CONTENTS OF R4, AND R1 ARE NOT 
8 TURBED . 

sLOCATION “COUNT” , IF NOT EQUAL TO O SIGNIFIES DATA ERROR 

sIF THE STATUS IS FLOATING MODE, THE LAST TWO BYTES OF RECEIEVED 

sARE SIMPLY CHECKED FOR ZEROS 

; 


DATVFR: MOV R4,-CSP) sSAVE R4 
MOV k1,-(S°) sSAVE R1 
MOV @3, COUNT 3SET UP ITERATION COUNT 
JP DAT1 8 
3 
DATVER: MOV R4,-CSP sSAVE R4 
MOV R1,-CSP) sSAVE R1 
MOV ° 3SET UP ITERATION COUNT 
DAT1: DEC 
BfQ sBRANCH IF DONE 
_— (R4)¢,CR1)o 3 
2s: MOV (SP)+,R1 sRESTORE R1 
MOV (SP )+,R4 sRESTORE R4 
RTS R7 3GO BACK TO CALLING ROUTINE 


sIF DATA ERROR, COUNT NE 0 


SEQ 0432 
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DMARD DATI THRU Q22BE 


21662 
21663 
21664 
135446 
135446 032737 000100 
135454 0010350 
135456 004537 124272 
135462 005037 001102 
005037 001164 
135472 005237 001206 
135476 042737 100000 
135504 005327 
135506 000001 
135510 003022 
135512 012737 
135514 1 
135516 135506 
04401 155565 
135524 013746 001206 
135530 1 
135532 104401 135562 
135536 013700 000042 
135542 001405 
135544 
135546 004710 
135550 000240 
000240 
135554 000240 
135556 
1 000137 
135560 004724 
135562 377 377 
135565 015 012 
135570 116 104 
135573 120 101 
135576 123 040 
135601 000 
21665 
135602 


135602 104407 
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Ge 


MACRO M1200 16-OCT-84 16:38 PAGE 64 


001206 


SEQ 0433 


-SBTTL END OF PASS ROUTINE 

} pOSSHOSESESSESSSSEOEEESESEEEEESOEEEEESESEESESEEEEEEEEESESEEEEEES 
s@INCREMENT THE PASS NUMBER ( $PASS 

s@INDICATE END-OF -PROGRAM AFTER 1 PASSES THRU THE PROGRAM 

seTYPE “END PASS @XXXXX*“ oe XXXXX IS A DECIMAL NUMBER) 

s¢IF THERES A MONITOR GO T 

s¢IF THERE ISN'T JUMP TO LOOP. 


sEOP; 
BIT #BIT06 ,.oe52 
BNE T42 
JSR RS, VIREOP 
CLR ¢TSTNM 33sZERO THE TEST NUMBER 
CLR ¢TIMES 3sZERO THE NUMBER OF ITERATIONS 
INC PASS + INCREMENT THE PASS NUMBER 
BIC #100000, $PASS + DON T ALLOW A NEG. NUMBER 
OEC CPC )« 3 sLO0P? 
sEOPCT: .WORD 
6GT $DOAGN 3s YES 
MOV CPC )+, SCPC )+ ssRESTORE COUNTER 
SENDCT: .WORD 1 
sEOPCT 
TYPE . SENDMG ssTYPE “END PASS @” 
MOV $PASS, -(SP) 33SAVE $PASS FOR TYPEOUT 
TYPOS 33GO TYPE--DECIMAL ASCII WITH SIGN 
TYPE » SENULL ssTYPE A MULL CHARACTER 
$GET42: MOV 8042 ,RO 33GET MONITOR ADORESS 
Q $00AGN a8 IF NO MONITOR 
RESET 8 THE 
SENDAD: JSR PC, CRO) 33GO TO MONITOR 
wOP 33SAVE ROOM 
MOP 33FOR 
rele ssACTIL 
$DOAGN: 
JP aPC )« 3 sRETURN 
$RTNAD: ooP 


SEMALL: .BYTE -1,-1,0 ssNULL CHARACTER STRING 
SENDMG: .ASCIZ <15><12>/END PASS @/ 


-SBTTL SCOPE HANDLER ROUTINE 
Wristlet itr rrr 
s@THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
s@AND LOAD THE TEST NUMBER( ¢TSTNM) INTO THE DISPLAY REG.(DISPLAY<7:0>) 
sOAND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:06> 

BY THIS ROUTINE ARE: 


39S$W14°1 OOP ON TEST 

seSWil91 INHIBIT ITERATIONS 
3*SW0921 LOOP ON ERROR 

305W086=1 LOOP ON TEST IN SWR<5:0> 
s*CALL 

s¢ SCOPE 3s SCOPE=IOT 
$SCOPE : 


CKSWR ssTEST FOR CHANGE IN SOFT-SWR 
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SEQ 0434 
001000 177520 BIS #1000,BCSR ; ENABLE 
040000 043320 18: BIT eI 14,6SWR 3sLO0P ON PRESENT TEST? 
OVER tives IF SWi491 
1, OCOOOSTART OF cove FOR THE XOR TESTERGGOCS 
$xTSTR: BR 3sIF RUNNING ON THE “XOR” TESTER CHANGE 
ssTHIS INSTRUCTION TO A “NOP” (NOP=240) 
MOV @SERRVEC , -( SP) + ySAVE THE CONTENTS OF THE ERROR VECTOR 
135650 000004 MOV 5s. 3sSET FOR T 
177060 TST 00177060 ssTIME OuT XOR? 
MOV (SP)+, @SERRVEC ;;RESTORE THE ERROR VECTOR 
BR 33GO TO THE NEXT TEST 
S$: CMP (SP )+,CSP)- ssCLEAR THE STACK AFTER A TIME OUT 
000004 MOV de, + sREST THE ERROR VECTOR 
6R 3sLO0P ON THE PRESENT TEST 
6%: ;@@@00END OF CODE FOR THE XOR 
000400 043252 BIT @BITO6 , BSUR ssLOOP ON SPEC. TEST? 
BEQ os IF wo 
043244 MOV @SuR, -( SP) 33sSET DESIRED TEST bs 
000300 BIC @$SURMK (SP) ssSTRIP AWAY UNDESIRED BITS 
001102 CPB (SP )+, STSTNM 330N THE RIGHT TEST? 
BEO sOVER 336R IF YES 
001103 2t: o —— 88 A, ERROR OCCURRED? 
8 
001115 001103 CMPB aaa a FOR THIS TEST OCCURRED? 
3 
001000 043206 BIT OBI TOS, BSR 3sLO0P ON ERROR? 
BEQ 4% 336R IF NO 
001110 001106 7%: _ 2 ace 33SET LOOP ADORESS TO LAST SCOPE 
001103 4%: CLAS sERFLG 33ZERO THE ERROR FLAG 
11 CLR sTIMES ssCLEAR THE NUMBER OF ITERATIONS TO MAKE 
BR t 3sESCAPE TO THE NEXT TEST 
004000 043154 3%: BIT @61IT11,@SUR ssINHIBIT ITERATIONS? 
BNE is +3B8R Yes 
001206 TST $PASS ssIF FIRST PASS OF 
BEQ 1s 88 ITERATIONS 
001104 INC ¢ICnT 88 TION 
001164 001104 CMP ¢TIMES, SICNT 88 THE OF ITERATIONS MADE 
6GE sOVER 330R IF MORE ITERATION 
000001 001104 18: MOV #1, ¢ICNT ssREINITIALIZE THE ITERATION COUNTER 
136102 001164 MOV GMXCNT, ¢TIMES 3;SET ITERATIONS 
001102 $SVLAD: INCB ¢TSTNM 3 sCOUNT T 
001102 001204 MOvVB 6TSTNM,STESTN ;;SET TEST NUMBER IN APT MAILBOX 
001106 Mov (SP), $LP. 3sSAVE SCOPE LOOP ADDRESS 
001110 MOV (SP), ¢ 33SAVE ERROR ADORESS 
001166 CLR 8 THE ESCAPE FROM ERROR ADORESS 
000001 001115 faeac! @1, SERMAX ssONLY ALLOW ONE(1) ERROR ON NEXT TEST 
001102 043054 ‘sOVER: MOV ¢TSTNM, EDISPLAY 1 OISPLAY TEST NUMBER 
001106 MOV ¢LPADR, aaF RETURN ADDRESS 
001000 177520 23 #1000.8CSR ; DISABLE 


OMXCNT: 1 
-SBTTL ERROR HANDLER ROUTINE 


ssMAX, NUMBER OF ITERATIONS 


§ SSSSSSSSSSSSSOSSESESESESSEDESSESEEEESEESEEEEESEESESEESEESESEEEEe 
INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
ERROR ITEM NUMBER AND THE ADORESS OF THE ERROR CALL 

seAND GO TO ERTYPE ON ERROR 





le 
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ERROR HANDLER ROUTINE 


004116 
000032 


177520 
042776 
042766 


001116 
001114 
042726 


001220 
136246 


000042 


SEQ 0435 


s@THE SWITCH mee on aah BY THIS ROUTINE ARE: 
INHIBIT ERROR TYPEGUTS 
BELL ON ERROR 


3@SW1S°1 
3¢SW13¢1 
3@SW10°1 
3*SW0921 
s@CALL 
34 ERROR 
: 
TST 
BEQ 
CLR 
JSR 
9%: 
CK 
BIS 
7%: 
BEQ 
MOV 
BIT 
BEQ 
TYPE 
1s: INC 
MOV 
SUB 
MOvVB 
BIT 
BNE 
JSR 
TYPE 
20%: 
CePB 
BNE 
MOvVB 
JSR 
21%: BYTE 
BYTE 
22%: 
2s; TST 
BPL 
HALT 
Cw SUR 
3%: BIT 
BEQ 
MOV 
4$: TST 
BEQ 
Mov 
S$: 
CMP 
BNE 
HALT 
6%: 
.SSTTL 
ABORT: TST 
BEQ 
CMP 


LOOP ON ERROR 
oN ssERROR=EMT AND NeERROR ITEM NUMBER 
UQUIET ssTEST FOR USER-QUIET MODE 
1) 3sBRANCH IF FIELD-SERVICE MODE 
RO 33IN CASE RO HAS A @3 IN IT (*C) 
PC ABORT SSTEST FOR ABORT CONDITION 

3sTEST FOR CHANGE IN SOFT-SUR 
#1000 .,.BCSR sENABLE HALT ON BREAK 
sERFLG 33SET THE ERROR FLAG 
7% 3300N‘T LET THE FLAG GO TO ZERO 
¢TSTNM,GDISPLAY ;;DISPLAY TEST NUMBER AND ERROR FLAG 
@6IT10,GSiR 3s8ELL ON ERROR? 
i s0NO - 
e ssRING BELL 

TTL 3sCOUNT THE NUMBER 
CSP), SERRPC 33GET OF ERROR INSTRUCTION 
$I s3STRIP AND SAVE THE ERROR ITEM CODE 
@8IT13.8SiR 32SKIP TYPEOUT IF SET 
¢ 3sSKIP TYPEOUTS 

PC ,ERTYPE 33GO TO USER ERROR ROUTINE 
. SCRLF 
OAPTENV , SENV s sRUNNING IN APT MODE 
2s 33N0,.SKIP APT ERROR REPORT 
sITEMB.21% 33SET ITEM NUMBER AS ERROR NUMBER 
permis 3sREPORT FATAL ERROR TO APT 
0 
22% 33APT ERROR LOOP 
&SUR ssHALT ON ERROR 
3% 33SKIP IF CONTINUE 

ssHALT ON ERROR! 

3sTEST FOR CHANGE IN SOFT-SUR 
@BIT09, BSUR 3sLO0P ON ERROR SWITCH SET? 
as 336R IF NO 
$LPERR , (SP) 3sFUDGE RETURN FOR LOOPING 
sESCAPE 3 3CHECK FOR AN ESCAPE ADDRESS 
S$ 330R IF NONE 
sESCAPE ,( SP) 3sFUDGE RETURN ADDRESS FOR ESCAPE 
@$ENDAD , 8442 3sACT-11 AUTO-ACCEPT? 
6$ 3 sBRANCH IF NO 


NOABRT 
RO, @32 


3sYES 


TI 3 sRETURN 
ABORT ROUTINE FOR LCP/ORION UFD MODE 
UFOFLG s TEST 


FOR USER FRIENDLY MODE 
VIF NOT UFD THEN CONTINUE NORMAL OPERATION 
sIS IT A tZ ? 
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0014435 
02002 
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000030 
000032 


177777 


001221 


136642 


PC 
APT COMMUNICATIONS ROUTINE 


sJUST GO BACK TO CHAIN IF IT IS (NO ERROR) 

sIS IS A tC ? 

sBR TO LOAD tC ON XXDP+ STACK (NO ERROR) 

sTEST FOR USER-QUIET MODE 

sIF FIELD-SERVICE MODE, CONTINUE MORMAL OPERATION 

§ or Ouse FIELD- ~SERVICE MODE DOES NOT QUIT ON ERROR 


THEN 
sRESTORE EMT LOCATION (30) 
sRESTORE EMT PRIORITY LOCATION (32) 
> i it LOC. INTO RO FROM MONITOR 
sFIND END OF STACK 


sMAKE NEW END TO STACK 

sNOW LEA 

sRESTORE EMT LOCATION (30) 

sRESTORE EMT PRIORITY LOCATION (32) 
= OCA LOCATION INTO RO FROM MONITOR 


FLAG 
wor TO MONITOR-DO NOT PUSH STACK HERE 
NOTUFD RETURN TO MAINLINE 


3 § SOARASHSOSSSSSSASSESSSESESCASESSEBSEHSSHABSAGHHISHUAKRSS SSS SHES HSKEES 


BEQ 
CMP 
BEQ 
TST 
BEQ 
BR 
ABORTC: MOV 
MOV 
EMT 
18: TST 
BNE 
MOVB 
MOVB 
MOVB 
CLRB 
Be 
ABORTE: MOV 
MoV 
EMT 
MOV 
ABORTZ: MOV 
CLR 
JP 
NOABRT: RTS 
-SBTTL 
$ATY1: MOVB 
SATY3: MOVB 
BR 
SATY4: MOVB 
SATYC: 
TSTB 
a 
BITB 
BEQ 
MOV 
ADO 
1%: TST 
BNE 
MOV 
2s: TSTB 
BNE 
SUB 
ASR 
MOV 
MOV 
BR 
36: MOV 
ADO 
MOV 


RO, -(SP) 


3370 REPORT FATAL 
3370 TYPE A MESSAGE 


3370 ONLY REPORT FATAL ERROR 
3sPUSH RO ON STACK 


33PUSH R1 ON STACK 

88 TYPE A MESSAGE? 
33IF NOT: BR 

3s sOPERATING UNDER APT? 
ssIF NOT: BR 

8 SPOOL MESSAGES? 
33IF NOT: BR 


RETURN ADOR. 
33sSEE IF DONE W/ LAST XMISSION? 
s3IF NOT: WAIT 

s3sPUT ADOR IN MAILBOX 
+ sFIND END OF MESSAGE 


33SUB START OF MESSAGE 


ssTELL APT To TAKE HSC. 


ssPUT MSG ADOR IN JSR LINKAGE 
33:8UMP RETURN ADORESS 

3 sPUSH 177776 ON STACK 

3sCALL TYPE MACRO 





Ke 
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APT COMMUNICATIONS ROUTINE 


136644 105737 136752 
136652 005737 001220 


| 136666 017637 000004 001202 
000004 


136734 105737 001157 


000002 
136754 122737 000001 001220 
136764 132737 000100 001221 


001405 
136774 010037 137004 
137000 004737 136474 
000000 


137006 132737 000040 001221 


| 
21668 
| 
| 
| 
| 


SEQ 0437 
5$: 
10%; TSTB $FFLG +sSHOULD REPORT FATAL ERROR? 
BEQ 12% ssIF NOT: 6R 
TST $ENV 3 sRUNNING UNDER APT? 
BEQ 12% s3IF NOT: 
118%: TST $MSGTYPE ssFINISHED LAST MESSAGE? 
BNE 8 ssIF NOT: WAIT 
MOV @4(SP),SFATAL 4;GET s 
ADO P ) ai RE ADOR. 
INC 33 TELL TO TAKE ERROR 
12%: CLRB $FFLG 33CLEAR FATAL FLAG 
CLRB ssCLEAR LOG FLAG 
CLRB $MFLG 3sCLEAR MESSAGE FLAG 
MOV (SP )+,R1 3sPOP STACK INTO R1 
MOV (SP)+,RO 88 ST INTO RO 
RTS PC 3 sRETURN 
SMFLG: .BYTE O 33MESSG. FLAG 
$LFLG: .BYTE O 33LOG FLAG 
SFFLG: .BYTE O ssFATAL FLAG 
APTSIZE=200 ‘ 
2001 e 
APTSPOOL = 100 
APTCSUP=040 
-SOTTL TYPE ROUTINE 
§ s POSSE KSSSSSSSSSESESSSSEESEEOSESESESESOEEESESESEEEEEEESESEEESES 
s@ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
pe THE INE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
s@NOTE1: @NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER 
3s *NOTE2: $FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
3s @NOTES: $FILLC CONTAINS THE CHARACTER TO FILL AFTER. 
5% 
seCALL: 
31) USING A TRAP INSTRUCTION 
_. TYPE »MESADR s3sMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
3 
3% TYPE 
3% MESADR 
3% 
$TYPE: TSTB sTPFLG 23IS THERE A TERMINAL? 
BPL is 330R IF YES 
HALT ssHALT HERE IF NO TERMINAL 
Ba 3% 3 sLEAVE 
1s: MOV RO, -(SP) ssSAVE RO 
MOV G2(SP),RO 3sGET ADORESS OF ASCIZ STRING 
ChMPB @APTENV , SENV 8 IN APT MODE 
BNE 626 33N0,.GO CHECK FOR APT CONSOLE 
BITB @APTSPOOL , SENVM ;;SPOOL MESSAGE TO APT 
BEQ 62% 33N0,GO CHECK FOR CONSOLE 
AOV RO,61% 3sSETUP MESSAGE ADDRESS FOR APT 
JSR PC, $ATYS 33SPOOL MESSAGE TO APT 
61%: -WORD O 5 3ME ADDRESS 
62%: BITB @APTCSUP,,SENVM ;;APT 
BNE $ 3sYES.SKIP TYPE 
2s: MOVB (RO)+, -C SP) 33PUSH CHARACTER TO BE TYPED ONTO STACK 
BNE at 338R IF IT ISN’T THE TERMINATOR 


=~ 
wn 
«4 


(SP) ssIF TERMINATOR POP IT OFF THE STACK 





co 
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SEQ 0436 
| TYPE ROUTINE 

137024 012600 60%: MOV (SP)+,RO 3 sRESTORE RO 
137026 062716 000002 38: ADO @2,(SP) ssADJUST RETURN PC 
137032 000002 RTI 3 sRETURN 
137034 122716 000011 4%: CMPB @HT CSP) 3sBRANCH IF <HT> 
137040 001430 BEQ 8s 
137042 122716 000200 CMPB @CALF CSP) 3sBRANCH IF NOT <CRLF> 
137046 001006 BNE 5% 
137050 005726 TST (SP )+ 3sPOP <CR><LF> EQUIV 
137052 104401 TYPE ssTYPE A CR AND LF 
137054 001175 ¢CRLF 
137056 105037 137264 CLRB $CHARCNT 3sCLEAR CHARACTER COUNT 
137062 000755 BR 2s 33GET NEXT CHARACTER 
137064 004737 137146 58: JSR PC, $TYPEC 33GO TYPE THIS CHARACTER 
137070 123726 001156 6%: CMPB SF ILLC,CSP)+ 331S IT TIME FOR FILLER CHARS.? 
137074 1 BNE et ssIF NO GET NEXT CHAR. 
137076 013746 001154 MOV $NULL , -( SP) 33sGET @ OF FILLER CHARS. NEEDED 

38 THE NULL CHAR. 
137102 105366 000001 78: DECB 1(SP) 33D0ES A NULL NEED TO BE TYPED? 
137106 002770 BLT 63 338R IF NO--GO POP THE NULL OFF OF STACK 
137110 004737 137146 JSR PC, $TYPEC 33G0 TYPE 
137114 105337 137264 OECB $CHARCNT 88 COUNT AS A COUNT 
137120 000770 BR 7$ 3 sLO0P 

sHORIZONTAL TAB PROCESSOR 

137122 112716 000040 8%: MOVB @ (SP) 3sREPLACE TAB WITH SPACE 
137126 004737 137146 9%: JSR PC, $TYPEC ssTYPE A SPACE 
137132 132737 000007 137264 BITB #7, $CHARCNT 3 3BRANCH IF NOT AT 
137140 001372 BNE gi 33TAB STOP 
137142 005726 TST (SP )+ 33sPOP SPACE OFF STACK 
137144 000724 BR as 33sGET NEXT CHARACTER 
137146 $TYPEC: 
137146 105777 041772 TSTB esTKS 33CHAR IN KYBD BUFFER? 34JD001 
137152 100022 BPL 10% 336R IF NOT 340001 
137154 017746 041766 MOV AsTKB, -C(SP) 33GET CHAR 340001 
137160 042716 177600 BIC #177600, (SP) ssSTRIP EXTRANEOUS BITS 340001 
137164 122716 000023 CMPB @¢XOFF ,CSP) 33WAS CHAR XOFF 340001 
137170 001012 338R IF NOT 340001 
137172 101%: 34/0001 
137172 105777 041746 TSTB asTKS ssWAIT FOR CHAR :4JD0001 
137176 100375 BPL 101% 3sMJD001 
137200 117716 041742 OsTKB,(SP) 33GET CHAR 3MJD001 
37 042716 177600 BIC #177600,(SP) ssSTRIP IT 3MJ0001 
137210 122716 @¢X0N, (SP) 3sWAS IT XON? 34/0001 
137214 001366 BNE 101% 336R IF NOT 34/0001 
137216 102%: 34/0001 
137216 005726 TST (SP )-« ssFIX STACK 3MJD001 
137220 10%; 34/0001 
137220 105777 041724 TST8 esTPS ssWAIT UNTIL PRINTER IS READY 
137224 100375 BPL 10% 1 
137226 116677 000002 041716 MOvVB 2( SP), @¢TPB 33LOAD CHAR TO BE TYPED INTO DATA REG. 
137234 122766 000015 000002 ChPB @CR,2¢SP) 3831S CHARACTER A CARRIAGE RETURN? 
137242 001003 BNE 1s 8 
137244 105037 137264 CLAB $ 33YES--CLEAR CHARACTER COUNT 
137250 000406 GR sTYPEX a8 
137252 122766 000012 000002 1%: CMPB @LF ,2(SP) 3381S CHARACTER A LINE FEED? 
137260 001402 B£Q sTYPEX a8 Yves 
137262 105227 INCB CPC )+ 130 


THE CHARACTER 
137264 000000 $CHARCNT: .WORD 0 ssCHARACTER COUNT STORAGE 
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SEQ 0439 
‘TYPE ROUTINE 
137266 000207 $TYPEX: RTS PC 
21669 “SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
83 SHSESEHEARCSKSSHKREHEHASCAREHOHHAKRSEKSKRKEHSSEKSSESEEEROEOSEHKHKSHOKEEKRHEEESE 
| }@THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
| }@OCTAL (ASCII) NUMBER AND TYPE IT. 
| ;@$TYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
s@CALL: 
| 36 MOVs NUM, -( SP) NUMBER TO BE TYPED 
38 TYPOS ssCALL FOR TYPEOUT 
+e ‘BYTE ON :sNe1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
| i ‘evTle ssM=1 OR O 
36 141°TYPE LEADING ZEROS 
| 36 + :0°SUPPRESS LEADING ZEROS 
38 
:¢$TYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
| ;@$TYPOS OR $TYPOC 
3s@CALL: 
_ MOVs NUM, -(SP) :sNUMBER TO BE TYPED 
30 TYPON 13CALL FOR TYPEOUT 
3% 
;e$TYPOC---ENTER MERE FOR TYPEOUT OF A 16 BIT NUMBER 
3*CALL: 
36 MOVs NUM, -(SP) ssNUMBER TO BE TYPED 
se TYPOC 13CALL FOR TYPEOUT 
137270 017646 $TYPOS: MOV @( SP), -( SP) ssPICKUP THE 
137274 116637 000001 137513 MOVE 1(SP).¢0FILL 4;LOAD ZERO FILL 
137302 112637 137515 MOVE }e, SOMODEs1 3 ;MUMBER OF DIGITS TO TYPE 
137306 062716 000002 ADO CSP) ‘8 
137312 000406 eR 
137314 112737 000001 137513 $TYPOC: MOVE 01, SOF ILL 
137322 112737 000006 137515 nove * SOMODE +1 1 eSET FOR Srxce) ciTs. 
137330 112737 000005 137512 $TYPON: MOVB * sOCNT a8 
137336 010346 MOV sa. -( SP) a8 
137340 010446 MOV s-&RA. -( SP) 1ISAVE R4 
137342 010546 MOV —s«RS. -( SP) 1sSAVE RS 
157344 113708 157515 nove °1,R4 13GET THE NUMBER OF DIGITS TO TYPE 
137352 000006 ADD s«6, RA :sSUBTRACT IT FOR MAX. ALLOWED 
137356 110637 137514 MOVE . +:SAVE IT FOR USE 
137362 113704 137513 MOVE SOF ILL ,RA 13GET THE ZERO FILL SWITCH 
37366 000012 MOV =: 12(SP).RS PICKUP THE 
137372 005003 CLR RS CLEAR THE OUTPUT WORD 
137374 006105 1s: RO 2S ;sROTATE MSB INTO “C” 
137376 000404 BR 34 3160 00 MSB 
137400 006105 2; ROL 2S 33FORM THIS DIGIT 
137402 006105 ROL 2S 
137404 006105 RO 2S 
137406 010503 MOV —s«RS, RB 
137410 006103 38: RO. 2s «RS 1:GET LS8 OF THIS DIGIT 
137412 105337 137514 DECB sOMODE 1sTYPE THIS OIGIT? 
137416 100016 PL tiéTSB 5308 IF NO 
137420 042703 177770 BIC #177770, R3 13GET RID OF JUNK 
137424 001002 BNE Os i: TEST FOR O 
137426 005704 1ST = RA - SS THIS 0? 
137430 001403 BEQStié*SSK 10R IF YES 
137432 005204 4s: INC 30 RA 1:D0N'T SUPPRESS ANYMORE 0'S 
137434 052703 000060 BIS #0, R3 ;:MAKE THIS DIGIT ASCII 


— 
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; 
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21670 


000040 
137510 
137510 
137512 


000001 


| BINARY TO OCTAL CASCII) AND TYPE 


3 sMAKE — IF NOT ALREADY 

3sSAVE FOR TYPING 

33GO TYPE THIS DIGIT 
COUNT BY 1 

336R IF MORE TO DO 
aR 

33GO DO THE LAST DIGIT 

33SET THE STACK FOR RETURNING 
3 sRETURN 

+ STORAGE FOR ASCII DIGIT 
TERMINATOR FOR TYPE ROUT 


SWITCH 
wg A: TO TYPE 


$OMODE : 
"thes CONVERT BINARY TO DECIMAL AND TVPE ROUT 


HEVGSRSSRO SHH 


j SSOSSSOSeesssoosooesossoosesooeoooooSSSSoSeoSeeSSeESS 
;eTHTS ROUTINE IS USED TO CHANGE A .--¥ BINARY NUMBER TO A 5-DIGIT 
(ASCII) AND T DEPEND 
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S$: BIS & RS 
MOvB R3 6% 
TYPE 8% 
78: DECB sOCNT 
BGT 2s 
BLT 6% 
INC R4 
BR es 
6%: MOV CSP)+,RS 
MOV CSP )+,R4 
MOV (SP)+,R3 
000004 MOV 2CSP),4(SP) 
MOV (SP)+, CSP) 
RTI 
8s: -B6YTE O 
-B6YTE O 
sOCNT: .BYTE 9O 
SOF ILL: ye 4 
s@SIGNED DECIMAL 
1 oMUMBER IS POSITIVE OR 
s@BEFORE THE FIRST DIGIT OF THE 
s@REPLACED WITH SPACES. 
3s@CALL: 
3% MOV NUM, -CSP) 
3% TYPOS 
$TYPDS: 
MOV RO, -CSP) 
MOV R1,-CSP) 
MOV R2,-(SP 
MOV R3,-CSP) 
MOV -C 
MOV --(SP) 
MOV 20(SP),RS 
BPL 1$ 
NEG RS 
000001 MOvVB @'-,1¢SP) 
1%: CLR RO 
MOV @sOBLK ,.RS 
MOvVB @ ,CR3)+ 
2s: CLR Re 
MOV sOTBLC(RO),R1 
3%: SUB R1,RS 
BLT 4g 
INC Re 
BR 3% 
4$: ADO R1,R5 
TST Re 
BNE 5% 
TSTB (SP) 
BMI 7$ 
5$: ASLB (SP) 
BCC 6% 
177777 MOvB 1(SP),-1¢R3) 


NUMBER 
NEGATIVE A SPACE OR A MINUS 
NUMBER. LEAD 


YPE IT. ING ON WHETHER THE 
SIGN WILL BE TYPED 
ING ZEROS WILL ALWAYS BE 
33sPUT THE BINARY NUMBER ON THE STACK 
33GO TO THE ROUTINE 


33sPUSH RO ON STACK 
3sPUSH R1 ON STACK 


38 R3 ON STACK 

38 RS ON ST 

33SET BLANK SWITCH AND SIGN 
33sGET THE 

+3BR INPUT IS POS 

ssMAKE THE BINARY NUMBER POS 


3s sCLEAR 
33GET THE CONSTANT 
33FORM THIS BCD DIGIT 


$3 
ss INCREASE THE BCD DIGIT BY 1 


33sADO BACK THE CONSTANT 
— IF BCD DIGIT=0 
THROUGH 0 


sFALL IF 
VSTILL a LEADING 0'S? 


38 IF NO 
33 YES--SET THE SIGN 
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MACRO M1200 16-OCT-84 16:38 PAGE 64-8 
TO DECIMAL AND TYPE ROUTINE 
052702 000060 6: ers @'0,R2 ssMAKE THE BCD DIGIT ASCII 
052702 000040 7$: eIs . ssMAKE IT A SPACE IF NOT ALREADY A DIGIT 
110223 R2,(RS)> 5sPUT THIS CHARACTER IN THE OUTPUT BUFFER 
005720 TST (RO)> 1sJUST INCREMENTING 
020027 000610 CHP RO, 010 ssCMECK THE TABLE INDEX 
002746 BLT 26 1160 00 THE NEXT DIGIT 
003002 eGT rT 13G0 Toe EXIT 
010502 MOV RS ,R2 1:GET THE LSO 
764 BR 6: 31G0 CHANGE TO ASCII 
105726 8s: TSTB 0 (SP) 5sWAS THE LSD THE FIRST NON-ZERO? 
100003 BPL 98 3308 IF NO 
116663 177777 177776 MOVB -1(SP),-2(R3) 4: YES--SET THE SIGN FOR TYPING 
105013 98: CLAS ) 13SET THE TERMINATOR 
012605 mOV (SP )+ RS ssPOP STACK INTO RS 
012603 MOV (SP)+.R3 3sPOP STACK INTO R3 
012602 MOV (SP), R2 ‘8 TACK INTO R2 
012601 MOV (SP)+,R1 3sP0P STACK INTO Ri 
012600 MOV (SP)+,RO 3sPOP STACK INTO 
104401 137732 TYPE , S0BLK 13NOW TYPE THE 
016666 000002 000004 MOV 2(SP),4(SP) ssAQJUST THE STACK 
012616 MOV (SP), (SP) 
atl 1:RETURN TO USER 
023420 $0TBL: 10000. 
001750 1000. 
000144 100. 
000012 10. 
COBLK: .BLKM 4 
.SBTTL TTY INPUT ROUTINE 
3 Sais CaLAML Sol nieiecoraam meade eieiaan titans itiaetiemeamanaa aeaeaeeaa ia 
7 Ls 
3 3 SSSSSSSSSSE SSESOSCSEESSSTEDASSHOBAHPASHASASHSEHHe* HO OBE 
s@SOFTWARE SMITCH REGISTER 
seROUTIME IS FROM THE TRAP HANDLER, AMD WILL 
s@SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
1 uMEN TING IN TTY FLAG MODE. 
7 000176 001140 sCKSUR: ‘ 1321S THE SOFT-SMR SELECTED? 
001074 158 1:QRANCH IF NO 
105777 041166 TsTe GsTes 33CHAR THERE? 
100071 BPL 158 saIF "O, DON'T WAIT AROUND 
117746 041162 MOVE BS TKB, -(SP) 1sSAVE THE CHAR 
177600 BIC erci77. (SP) 3sSTRIP-OFF THE ASCII 
000007 oP 7,(SP)« 3sIS IT A CONTROL G? 
001062 et taNO, RETURN TO USER 
123727 001134 000001 Cre sauTos,e1 3,ARE WE RUNMING IN AUTO-MODE? 
001456 BE 15¢ s:QRANCH IF YES 
104401 140477 TYPE ,SCNTLG ss€CHO THE CONTROL-G (*G) 
104401 1 $GTSUR; TYPE | OMS ssTYPE CURRENT 
013746 000176 HOW SUREG, -( SP) 1sSAVE SMREG FOR TYPE 
104402 TYPOC 3:60 TYPE--OCTAL ASCII(ALL DIGITS) 
104401 140515 TYPE shew 1 :PROMPT FOR NEW SUR 
005046 196: CLR -(SP) a8 
CLR -($P) 1iTHE NEW SUR 
105777 041104 16: TST® © @STKS rr 
100375 7% snIF NOT TRY AGAIN 
117746 041100 @dTKB, -(SP) ai? 
716 177600 IC @*C177,(SP) 1sMAKE IT 7-817 ASCII 
021627 000025 96; cep (SP), 025 1aIS IT A CONTROL -U? 
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SEQ 0442 
TTY INPUT ROUTINE | 
140056 001005 BNE 0 1 ;BRANCH 
140060 104401 140472 TYPE ,éCNTLU ssYES, ECHO CONTROL -U (tu) 
140064 062706 000006 208: Ado . sIGMORE PREVIOUS INPUT 
140070 000757 BR saLET’S TRY IT AGAIN 
140072 021627 000015 108: CHP (SP), 015 sT8 IT A <CR>? 
140076 001022 BNE NO 
140100 005 000004 TST a(SP) +eY@S, XS IT THE FIRST CHAR? 
140106 1403 BEQ 88 YES 
140106 016677 000002 041024 MOV 2(SP), SUR ssSAVE NEW 
140114 062706 000006 118: Abo ; ssCLEAR UP STACK 
140120 108401 001175 148; TYPE ,éCRLF 3sECHO <CR> AMD <LF> 
140124 123727 001135 000001 CHB «GS INTAG, 01 1 9RE-ENABLE TTY KBD INTERRUPTS? 
140132 001003 Be 158 1s8RANCH IF NOT 
140134 012777 000100 041002 MOV @100, @8TKS 3 sRE-EMABLE TTY KBD INTERRUPTS 
140142 000002 15¢: ATI 3 sRETLRN 
140144 004737 137146 16%: JSR PC, STYPEC ssECHO CHAR 
140150 021627 000060 cP (SP), 060 11CHAR < 0? 
140154 8LT ssQRANCH IF YES 
140156 021627 000067 CHP (SP), 067 33CHAR > 72 
140162 003015 GcT 1 1 BRANCH 
1 042726 00006u Ic 060, (SP)+ ssSTRIP-OFF ASCII 
140170 005766 000002 TST 2c 3321S THIS THE FIRST CHAR 
140174 001403 ze 17% 3 sGRANCH IF YES 
140176 006316 (SP) 33NO, SMIFT 
1 006316 ASL (SP) 13 CHAR OVER TO MAKE 
140202 006316 ASL (sp) ‘8 FOR NEL ONE. 
140204 005266 000002 178: INC 2(SP) seKEEP COUNT OF CHAR 
140210 056616 177776 eis -2( SP), (SP) 34SET IN NEW CHAR 
140214 000707 1% -9:GET THE NEXT ONE 
140216 104401 001174 16s; TYPE ,¢QUES ssTYPE 2<CR><LF> 
140222 000720 on 208 ssSIMULATE CONTROL -U 
88 SCBAFVERSESARLSBESSSSALASSSSSHSSORSSEHASSSEESSHOESSSVASSHDESYHRKAHESHHE 
;@THES ROUTINE WILL INPUT A SINGLE FROM THE TTY 
seCALL: 
iT) ROCHR ss INPUT A SINGLE CHARACTER FROM THE TTY 
7° RETURN HERE ssCHARACTER IS ON THE STACK 
30 | ssMITH PARITY BIT STRIPPED OFF 
3 
140224 011646 SROCHR: MOV (SP), -(SP) 1:PUSH DOWN THE PC 
140226 016666 000004 000002 MOV as). 2(SP) 1sSAVE THE PS 
140234 105777 040704 16: TST ssWAIT FOR 
140240 100375 BPL ' ' TER 
140242 117766 040700 000004 MOVE  8¢TKB,4(SP) 3sREAD THE TTY 
140250 042766 177600 000004 BIC orce1 77» 4(SP) 4:GET RID OF JUNK IF ANY 
140256 7 000004 000023 cee 023 3322S IT A CONTROL-S? 
140264 001013 BRE al 3:QRANCH IF NO 
140266 105777 040652 2%: TST8 «= @S TKS +sWAIT FOR A CHARACTER 
140272 100375 BPL 26 3sLOOP UNTIL ITS THERE 
140274 117746 040646 MOVB  B4TKB, -(SP) 13GET CHARACTER 
140300 042716 177600 BIC orca??, (SP) 1sMAKE IT 7-BIT ASCII 
40304 022627 000021 (SP)+, 21 1321S IT A CONTROL -Q? 
140310 001366 BNE 28 saIF NOT DISCARD IT 
140312 000750 BR 16 s1YES, RESUME 
140314 026627 000004 000021 34: rae 4(SP),@3XON 3221S IT A RANDOM XON? :RANOO1 
140322 001744 BEQ 18 1sQRANCH IF YES ;RANOO1 
140324 000004 000140 CMP 4(SP), 0140 1:I1S IT UPPER CASE? 
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000175 


_—— - a ee a ee ee - + ee -e a = ee ee ee + _—_ — 


s 
: 


BLT 46 3 sBRANCH IF YES 
CMP 4(SP),@175 33IS IT A SPECIAL CHAR? 
6GT as 3 sQRANCH IF YES 
BIC 040 ,4(SP) ssMAKE IT UPPER CASE 
4s; RTI 33G0 BACK TO USER 
3 FRPAHHSHHOHSODOHASHSSOHASOSSSESADSHSSESAGMEDEHEHASSESSEHEHHKEHSH REESE 
peee SORES Ui, INPUT A STRING FROM THE TTY 
8 : 
s¢ ROLIN ssINPUT A STRING FROM THE TTY 
ie RETURN HERE SSADORESS OF FIRST CHARACTER WILL GE ON THE STACK 
18 s TERMINATOR WILL GE A BYTE OF ALL O'S 
SRDLIN: MOV RS, -CSP) a3 
1%: MOV OSTTYIN,RS 33GET ADORESS 
2%: cre OSTTYINeS..RS  3:OUFFER FUL? 
BLOS 4% a8 YES 
POCHR 33G0 READ ONE CHARACTER FROM THE TTY 
MOVB (SP)+, CRS) 33GET CHARACTER 
108: cree @177,CR3) 33IS IT A RUBOUT 
ONE 33SKIP IF NOT 
4$: TYPE . SQUES ssTYPE A ‘?° 
eR 1% 88 THE BUFFER AND LOOP 
3%: we CRS).98 33ECHO THE CHARACTER 
cers 015,(R3)o 3 sCHECK FOR RETURN 
Bee 2s 33LO0P IF NOT RE 
CLRB -1(R3) 83 RETURN (THE 15) 
TYPE e ssTYPE A LINE 
MOV CHP )o,RS 3 sRESTORE RS 
ROY (SP), -CSP) ssADJUST THE STACK AND PUT ADDRESS OF THE 
MOV 4 SP), 2(SP) ‘8 FIRST ASCII CHARACTER ON IT 
Ov OsTTYIN, 4( SP) 
RTI 3 sRETURN 
96: BYTE O 3s sSTORAGE FOR ASCII CHAR. TO TYPE 
BYTE O +s TERMINA 
STTYIN: .OLKB 86, 3 sRESERVE A BYTES FOR TTY INPUT 


SCNTLU:;: .ASCIZ /fU/<15><12> ssCONTROL “U 
SCNTLG: .ASCIZ /tG/<i5><12> ssCONTROL “G” 
@MSWR: .ASCIZ <15><12>/SWR = / 


OMNEW: .ASCIZ / NEW = / 


-SBTTL READ AN OCTAL NUMBER FROM THE TTY 

Th Cn ye pg py apr parry og a 
s@THIS ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND 
s@CHANGE IT TO BINARY. 


seCALL: 
38 RDOCT 3sREAD AN OCTAL NUMBER 
Tt) RETURN HERE 33L0W ORDER BITS ARE ON TOP OF THE STACK 
if ssMIGH ORDER BITS ARE IN $SHIOCT 
$RDOCT: MOV (SP), -CSP) ssPROVIDE SPACE FOR THE 
MOV 4(SP),2(SP) ssINPUT NUMBER 
MOV .°(SP) 33PUSH RO ON STACK 
MOV R1,-C(SP) 33PUSH R1 ON STACK 
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COKDACO KDJ11-8 CLUSTER DIAG. MACRO 1200 
READ AN OCTAL NUMBER FROM THE TTY 


140542 010246 MOV R2,-(SP) ssPUSH R2 ON STACK 
140544 104411 18; ROLIN ssREAD AN ASCIZ LINE 
140546 012600 MOV (SP)+,RO 5 sGET yoy OF 1ST CHARACTER 
140550 005001 CLR R1 ssCLEAR DATA WORD 
1405S2 005002 CLR R2 
140534 112046 2: MOVB (RO)+,-CSP) s sPICKUP ant CHARACTER 
140536 001412 BEQ 3% ss IF T OuT 
140560 006501 ASL R1 592 
140562 006102 ROL R2 
140564 006301 ASL Ri 3304 
140566 006102 ROL Re 
140570 1 ASL R1 3308 
140572 006102 ROL Re 
140574 042716 177770 BIC @1C7,(SP) ssSTRIP THE ASCII JUNK 
140600 1 ADO (SP)+,R1 3sADD IN THIS DIGIT 
140602 000764 BR es s sLOOP 
140604 005726 38: TST (SP )« 3 sCLEAN TERMINATOR FROM STACK 
140606 010166 000012 MOV R1,12(¢SP) ssSAVE THE RESULT 
140612 010237 140626 MOV . SHIOCT 
140616 012602 MOV (SP)+,R2 3sPOP STACK INTO R2 
140620 012601 MOV (SP)+,R1 ssPOP STACK INTO Ri 
140622 012600 MOV (SP )+,RO ssPO0P STACK INTO RO 
140624 000002 RTI 3 sRETURN 
140626 000000 SHIOCT: , ssHIGH ORDER BITS GO HERE 
21673 - SBTTL TRAP DECODER 
h en yee an gg me eg py 
rte ne! Ba By BY THE “TRAP” INSTRUCTION 
ssAND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
3@0F THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
30GO TO THAT ROUTINE. 
140630 010046 STRAP; MOV RO, -CSP) ssSAVE RO 
140632 016600 000002 Mov 2( SP) RO 33sGET TRAP ADORESS 
140636 005740 TST -(RO) ssBACKUP BY 2 
140640 111000 MOVB CRO),RO 3sGET RIGHT BYTE OF TRAP 
140642 ASL RO ssPOSITION FOR INDEXING 
140644 016000 140664 MOV STRPADCRO),.RO ss INDEX TO TABLE 
140650 RTS ii? TO ROUTINE 
ssTHIS IS USE TO HANDLE THE I* MACRO 
140652 011646 : MOV (SP), -CSP) ssMOVE THE PC DOWN 
140654 016666 000004 000002 MOV 4(SP),2¢SP) ssMOVE THE PSW DOWN 
140662 000002 RTI ssRESTORE THE PSW 
-SBTTL TRAP TABLE 
seTHIS aS CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
seBY THE “ “ INSTRUCTION. 
: ROUTINE 
 ] eeeenecece 
140664 140652 $TRPAD: .WORD $TRAP2 
140666 136734 $TYPE ssCALL*TYPE TRAP +1(104401) TTY TYPEOUT ROUTINE 
140670 137314 $TYPOC 1s;CALL*TYPOC TRAP +2( 104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
140672 137270 $TYPOS 1 :CALL=TYPOS TRAP +3( 104403) TYPE OCTAL NUMBER (NO LEADING ZEROS 
140674 137330 $TYPON 14;CALL*TYPON TRAP +4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
140676 137516 $TYPDS s:CALL*TYPDS TRAP +S( 104405) TYPE DECIMAL NUMBER (WI 
140700 140012 $GTSUR 4 ;CALL°GTSWR TRAP +6( 104406) GET SOFT-SWR SETTING 
140702 137742 $CKSUR 4 CALL *CKSUR TRAP +7(104407) TEST FOR CHANGE IN SOFT-SUR 
140704 1 SROCHR 15 TRAP +10( 104410) TTY TYPEIN CHARACTER ROUTINE 
140706 140354 $ROLIN 4;CALL©ROLIN TRAP +11(104411) TTY TYPEIN STRING ROUTINE 
140710 140526 $ROOCT 4;CALL*RDOCT TRAP +12( 104412) READ AN OCTAL NUMBER FROM TTY 
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POWER DOWN AND UP ROUTINES 
21674 -SBTTL POWER DOWN AND UP ROUTINES 


3 INE 
140712 012737 141052 000024 $PWRON: MOV OCILLUP ,QOPWRVEC ;;SET FOR FAST UP 


ASCIZ <15><12>“POWER” 


141060 «01S. s«12—is«i120 SPOMER:: 


21676 


140720 012737 000340 000026 MOV 0340, G@PURVEC+2 5 ;PRIO:7 
140726 010046 MOV RO, -¢ 1)PUSH RO ON STACK 
| 140730 010146 MOV = R1, -( SP) 5sPUSH Ri ON STACK 
| 140732 01 MOV * -($P) 1 )PUSH R2 ON STACK 
| 140734 010346 HOV R3.-(SP) 1 )PUSH R3 ON STACK 
| 140736 010446 MOV * -(SP) 1 sPUSM R4 ON STACK 
140740 0 HOV RS. -(SP) 1)PUSH RS ON STACK 
140742 017746 040172 MOV . (SP) ‘8 ON STACK 
140746 010637 141056 MOV SP, 6SAVRE ssSAVE SP 
| 140752 012737 140764 000024 HOV SPURUP, SOPURVEC 3 ;SET UP VECTOR 
140760 HALT 
| 140762 000776 BR * ssHANG UP 
3 naan Soo cae ee ee 
| 140764 012737 141052 000024 $PURUP: HOV @SILLUP,QePURVEC ;;SET FOR FAST DOWN 
140772 013706 141056 MOV $SAVRG , SP 13GET 
| 140776 005037 141056 CLR $SAVR6 ;sWAIT LOOP FOR THE TTY 
| 141002 005237 141056 18: INC $SAVRE ‘8 FOR 
141006 001375 ONE Tt 
141010 012677 040124 MOV (SP)>, @SUR POP STACK INTO SSUR 
141014 012605 Ov (SP)-, a8 ST INTO RS 
141016 0 MOV (SP)-, 13P0P STACK INTO R4 
141020 012603 HOV (SP)o.R3 33P0P STACK INTO R3 
141022 012602 MOV (SP)e, 31P0P STACK INTO R2 
142024 012601 HOV (SP)+.R1 :3P0P STACK INTO Ri 
141026 012600 MOV (SP). RO 13P0P STACK INTO RO 
141030 012737 140712 000024 HOV OsPURDN, BOPURVEC s;SET UP THE POMER DOWN VECTOR 
141036 012737 000340 000026 MOV 0340, SOPURVEC+2 3 ;PRIO:7 
141044 104401 TYPE REPORT THE POWER FAILURE 
141046 141060 $PURMG: .WORD  sPOMER 1sPOWER FAIL MESSAGE POINTER 
141050 000002 TI 
141052 000000 $ILLUP: HALT 1:THE POWER UP SEQUENCE WAS STARTED 
141054 000776 BR ” 1 BEFORE THE POWER DOWN WAS COMPLETE 
141056 000000 $SAVR6: 0 1:PUT THE SP MERE 
| 
| 
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SEO 0446 
SYMBOL TABLE 
. AMADRS= 000000 BIT:4 = 040000 122110 05 —- 052634 
ABOEXT 106634 ARADR4= 000000 BITIS = 100000 DATI 06 
ABORT 136326 _ ARAHS12 000000 BIT2 * 000004 DATVER 135414 07 «0526 
ABORTC 136360 AHARS2= 000000 BITS = 000010 DATVFR 135376 EEPAS 003034 
ABORTE 136424 AHAHSS= 000000 BITs » 000020 OAT 1 EMTOA 030444 
ABORTI 105154 ARAHS4= 000000 BITS = 111460 EM0B 030452 
ABORTR 105216 AKSGAD= 000000 BIT6 = 000100 OOISP = 177570 EMTSAV 004024 
ABORTZ 136450 AHSGLG= 000000 BIT7 « DELAY 114270 EMTVEC* 0000 
ABORTO 043776 ANSGTY= 000000 BITS * 000400 OMi  =-132135 eM 124316 
ABORT? 044164 AHTYP1= 000000 BITS = 001000 OH105 133076 EM10 124570 
ABROUT 106466 000000 043726 133130 EM100 130104 
ACDML = AATYPS= 000000 044116 OH134 13 EM101 130142 
ACDM2_= 000000 AATYP4= 000000 BPTOA 030640 132421 02 130175 
ACPUOP= 000000 APASS = 000000 BPTOB 030646 OH27 132465 EM103 130257 
ACTCHS 002724 APRIOR= 000000 BPTVEC* 000014 132162 EM104 130332 
ACO AP TER 051342 Dra EM105 
AC1 #000001 TENV> 000001 BTEXP 003100 OMS EM106 130455 
wTsize BTGO 051142 OW47 = 132701 EM107 130533 
ACS #000003 APTSPO= 000100 BTRES 003110 OMS 132247 EM11 124611 
Aca  =#000006 000000 BTTST 051606 OH6S 132766 EM110 130567 
ACS #000005 ATESTW= 000000 BTTSTE 05 OH7 132346 EM111 130631 
8000006 * 000000 F 103434 133032 130707 
AC? 7 : DISPLA 001142 EM113 130772 
ADOLSB 111470 AVECT1* 000000 COR = 177746 DISPRE 000174 eni14 
| oot AVECT2 106426 1 EM115 131077 
ADDTRP 135234 CHECK 015322 134766 EM116 131147 
ADDMO = CHECK1 015400 OMATRN 134704 EM117 
ADDU = 000000 BACDAT 103126 CHECK2 015456 OPAREN 121414 eni2 
0= 000000 710 xT 2 177570 131273 
ADDM11= 000000 BCR = 177524 CHECIO 053602 OT1 133342 Emi21 131341 
ADDM12= 000000 BCSR = 177520 OT105 133620 EM122 131437 
ADDU13~ 000000 2 177524 CHEC27 OT115 133630 EM123 131465 
ADDW14= 000000 eFA 052212 CHECSO 057202 OT130 133664 EM124 131517 
ADDM1S= 000000 BFACL CHECS2 057574 OT134 EM125 131611 
ADDM2 = 000000 052020 CHECSS 060050 OT14 133410 EM126 
ADDMS = 000000 BFACS 052040 7 053366 OT17 133422 EM127 131705 
ADD = 000000 BF ACS CHK1O 053614 D724 «133434 EN15 
ADDMS = 000000 BFACS 052102 CHK7 «(053374 0127 1 EM130 131747 
ADDS = 000000 BF AE CH10 053606 OTSS 133456 EM131 131774 
ADDM7 = 000000 BFB SUR © 104407 O14 133350 EM1s2 1 
ADDMB = 000000 11006 CHPRTN 064372 O14. 133470 EM133 
ADDW9 = 000000 BITO » 00000 003 OT4S 13 EM134 132103 
ADEVCT= 000000 BITOO * 000001 CPEREG: 177766 OT47 «133514 EM14 124710 
ADEVM = 000000 BITO1 = CR = 000015 OTS 133362 EMIS 124733 
AENV = 000000 BITO2 « . 1 EM16 124767 
AENVM = 000000 BITOS » 000010 CSR OTS1 133540 EM1? 125034 
AFATAL* 000000 BITOS = 000020 CSRi2 002704 oTs2 133552 ena 124352 
ALLCTR 003152 BITOS « D164 133564 EM20 125100 
BITOS = 000100 CSR22 002706 D165 133576 EM21 125133 
AROTS 0215 BITO? = 111504 O17 133376 Eno2 125176 
MRITS 021570 BITOS = 111476 o175 i EMS 125235 
| MR2TS 021646 BITO9 = 001000 Ci2iA 023242 066372 EMS = 125311 
| MASTS 021724 gIT1 = C 023262 DVFSUB 065430 EN2S 
| ALRATS 022002 BIT10 * 002000 Ci2ic 023302 011 OS2572 125414 
| ALRSTS 022060 BIT11 * 004000 104670 02 EMO? 125463 
| AMADR1= 000000 BITi2 = 010000 DATA 002674 D3 052606 EMS 124364 
| MAADR2= 000000 BITIS = DATA2 002714 D4 =: 052620 EM3O 125523 
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SEQ 0447 

SYMBOL TABLE 
EMS1 125575 EXITST 111450 MITMIS* 177752 KIPORi= 172302 MBTOA 033012 
ENS2 125622 EXPBDT 106446 HMPARR 102724 KIPOR2= 172304 MBTOB 033014 
EMSS 3 EXPDAT 111462 HOP10 065642 KIPORS= 17, mBTOc § 86603 
EMS4 125725 EXPIRi 0 MOP 11 KIPOR4* 172310 MBTOD 033052 
EMSS 125765 EXPTBL 103154 067612 KIPORS* 172312 MBTOE 033054 

—«~ENS6 126015 EXPWOT 1 HOP13 070610 KIPOR6= 172314 MBTOF 033066 

| ENS7 7 FINNOP 021232 HOP14 071650 KIPOR7© 172316 MBT1 051120 

| Ene 124376 FIN1 334 HOP1S 073310 KMCR = mBT2 051122 

| Eneo 126121 FIN1O HOP16 073610 LASTCH MBT2ZA 051134 
En4i 126166 FINI1 HOP17 074242 LCDSUB 076532 BTS 

| Ené2 FINI16 022722 HOP16 076242 LCOFSUB 076130 MBT6A 051374 

| Emes 126300 FIN117 023036 HOP19 076644 MBTS6B 4 051416 
EMaa 1 023160 HOP20 6100234 134302 MBTeC 1440 
EneS 126371 FINI21 02 HOP21 101270 LEDS 332 MBT8O 051462 
EMa6 FINI22 MOP22 101716 LF * 000012 MBTSE 051506 
em47 126543 FIN125 025166 HOP44 064510 KS =1 MBTeF 051532 
Ens 124436 FIN126 HT * 000011 002722 MBTOFG 1 
EMSO FINI27 ILAQA 030740 LKSINT 134376 MBT6I 051572 
Ers1 126653 FINIS 054134 ILB80B 030746 LOOP Oa? MB66 011734 
ers2 FIN130 TLL 033034 LOOPIN 003154 MCB44 011620 
ess 126743 FINI4 ILLBOA 031034 LOST MCLRD 074276 
EMs4 126777 FINIS 054452 ILLB0B 031042 LOWADO 6 MCLRI 074354 
Erss 127035 FINI6 054616 TLLOP1 79 LSTADD 111502 064210 
EMs6 127071 FINI? ’ Taa LXPSUB 100014 MCTSCC 016046 
EnS7 127115 FIN2 0524 INIT 134110 MACCC 016176 MDAO 010372 
EMS FIN20 055152 INQ22 MACE 1 moccc 0 
EM60 127147 FIN21 055342 INTERR 1 mMACO 051172 MDOSUB 
EM61 127215 055506 103372 MACOA 051176 MOFSUB 0713574 
EM62 FIN23 055626 030346 MAC1 MDIVD 
EM63 127315 FIN24 056002 IOTOS 030354 MAC? MDIVF 064510 
Ena FIN26 * 000020 MACS 051236 010346 
EM6S 127405 FIN27 056770 IOXXx 033500 Maca 12352 MOM27 010456 
EM66 127455 FINSO 057300 172360 MACS 051266 MDSO 010422 
EM67 127514 FINSi 057420 KDPARI= 172362 maADCC 016122 MEMK 120750 
EN? FINS2 057672 * 172364 MAIREG* 177750 MEMQ 121000 
EM7O 127551 FINSS 060146 KDPARS* 172366 MALCC 016750 MENTO O 
EM71 127602 FING KDPAR4= 172370 017030 MET 032422 
EMN72 127636 FINS KDPARS© 172372 160 META 
EMTS 127674 FING 053214 KDPARG= 172374 MA11 010774 METS 032470 
EnN74 127720 FIN? 053434 KDPART= 172376 011700 METO 032500 
EMTS 127751 FLAG 003030 B11 011072 032510 
EM76 130002 003062 KDPORI= 172322 MBB22 «4011554 METO 
EN77 FLOAT 003052 * 172324 meccc) = (O1 METOA 032574 
ENDHRT 103116 FHPARR 102534 KDPORS= mBCOO )§8=—.-: 010576 METOB 032604 
EMDLUP 111424 sd KDPDR4* 172330 mBCil 486011152 METOC 0352616 
ENDMOV 111506 FRSTST 004726 KDPORS= 332 meCc22 48011442 METOO 
ENDTAG FSTADD 111500 KDPDR6* 172334 MBIOO 010516 METOE 032652 
EMDTLP 111374 111466 KDPOR7T= 172336 MBPTO 030574 METOF 032664 
ERR 135374 3020 172340 015716 MFA 051640 
ERRCNT GPROTS 005070 KIPARI= 172342 “BT 032 MFACU 051636 
ERRFP 135372 GPRITS 005146 KIPAR2= 172344 MBTA 032726 MFSRCM 060150 
ERROR = 1 KIPARS= 172346 7 MIALL 

| ERROUT 102056 GPR3STS 005302 KIPAR4* 172350 mBTcC §86015574 MIALLA 033324 

| ERRVEC= 000004 GPR4TS 005360 KIPARS= 172352 MBTO 0327 MIALLB 0 

| ERTYPE 153672 GPRSTS 005436 KIPAR6= 172354 MBTE 051636 MIALLD 033336 

005514 KIPART= 172356 MBTF 032750 MIALLF 


GPRETE 033346 
XBAD2 112602 GTSWR = 104406 KIPORO= 172300 MBTO 032762 MIL 033190 





| SYMBOL 


TABLE 


TT ar CRT 


MACRO M1200 16-OCT-64 16:38 PAGE 64-15 


BT 


j? 


3333333 
BREE EE 


MSTBS 


031614 


EEEESrEEEErPSSS EEE ES EPR EE KLE 


017120 


003026 
111474 
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COKDACO KDJ11-8 CLUSTER DIAG. MACRO M1200 16-OCT-64 16:38 PAGE 64-16 
| SYMBOL TABLE 


SEQ 0449 


| 
_ NOABRT 136464 PR4 = 000200 SOPORS= 172226 SWO7 = 000200 TAB4E 
NOTOK 135316 PRS = SOPOR4= 172230 SWO6 = 000400 TAB49 «= 0004014 
2 PR6 = 000300 SOPORS= 172232 SWO9 = 001000 TABS 003274 
NXMFIN 047616 PRT ® 340 SOPOR6= 172234 SWi = 000002 TABSA 003304 
NXMPAR 106670 PS = 177776 SOPOR7= 172236 SWi0 = 002000 003314 
047224 PSW = 177776 SEQ 003072 SWi1 = 004000 TAB6A 3 
ODOXXx PSWBTS 005576 073504 * 010000 TAB7 003334 
135274 PURVEC= 000024 SIMGUA 002702 SW13 = 020000 TABS 003344 
| OKAY? 043036 003002 SIPARO= 172240 SWi4 = 040000 TABS 003354 
OKAY7TA 043046 Q22INT 134664 SIPARi= 172242 SWiS = 100000 TAPABO 105034 
043024 Q22SIZ 134404 SIPAR2= 172244 . TA114 021150 
OK1 135322 RAPPAR 134326 SIPARS= 172246 SWS = 000010 TA116 
OK7 RBUF © 177562 SIPAR4= 172250 Sua ts TBITVE= 000014 
134630 RCSR = 177560 SIPARS= 172252 SWS os T8114 021160 
PAR 135210 RDCHR = 104410 SIPARG= 172254 SW6 = 000100 TC114 021170 
PARAD1 5644 ROLIN = 104411 SIPART= 172256 SW7 == 000200 T0114 
047256 RDOCT = 104412 IPORO= 172200 SWB == 000400 002740 
PARVAL 045676 RECDAT 111464 SIPORi= 172202 SWw9 = 001000 TE102 6017740 
PARVA2 047310 RECDST 003142 IPOR2* 172204 SXPSUB 101612 TE103 §6017762 
PARVAS 047426 RECFEC 003122 SIPORS= 17 TAB TE104 
PRAL 135212 RECST 003132 SIPOR4* 172210 TAB1O §6—. 003364 TE10S 020026 
°1i RESVEC= 10 SIPORS= 172212 TAB11 003374 TE106 020050 
POR 135166 RET1 SIPOR6= 172214 TAB11A TE107 020072 
POR1 135170 RET2 025334 SIPOR7= 172216 003414 TE110 020114 
PHY1 RETS 015412 SIXBIT 112774 TAB1S TE111 020136 
PIR = 177772 RITEDA 111472 120134 TAB13B 4003434 1 020160 
PIRQ = 177772 RTSE 003012 TAB14 Mas TE113 
PIRQNX 034202 RTS1 0 SLOCO1 003014 TABIS § 003454 TE113A 
PIRQT 123252 RTS6 015012 027574 TAB16 TE114 020774 
PIRQVE= 0 SPAU2 027616 TAB17 §©.003474 TE11S 022144 
PIRRTN 034502 R6 SPAUS 027636 TAB18 003504 TE11SA 022354 
PIRTBL 034304 R7 #8000007 SP AUS 7 TAB] TE1158 022364 
PIRTEX 730 SPAUS 027676 TAB21 003514 TE11SC 022372 
PIRXXX 034146 SAVFRO 003042 SPAUG 027714 TE1150 
PIRi 034204 SAVPR1 003044 003074 TAB23 TELISF 022406 
PIR2 003046 SPSJ 003076 TAB24 003544 TE116 022410 
PIR2ZEX 034432 SAVPCR 002726 SRO = 177572 TAB2S 003554 TE116A 
PIRS 034432 SAVPOS 003156 SR1 == 177574 TAB26 86:00 TE1268 022670 
PIRSEX 034526 SAVSUP 003036 * 177576 TAB27 003574 TE116C 022702 
PIR4 034526 SAYOMR SRS = 172516 TAB26 003604 TE1160 022712 
PIRS SAVUSE 003040 STACK = 001100 TAB29 003614 7 O22722 
PIRSEX 035014 SAV3O 83=—.-: 004112 START TAB29A 003624 TELI7A 023034 
PIR6 035014 SAVS2 004114 STBOT = TABS 003254 
PIRGEX 035116 101054 STKLMT= 177774 TABSO §=—.: 003634 TE120A 023114 
PITBL1 034410 ° STMOVI 110642 TABS1 003644 TE121 023170 
PITBL2 SOFSUB 074040 STMOVT 111764 TABS2 003654 023554 
PI1 034454 SOPARO= 172260 SUBT 052 TABSS TE123 
PI2 034466 SOPARI= 172262 SER 001140 TABS4 003674 TE124 
PIS 034470 SOPAR2= 172264 SWREG 000176 TAB4 TE125 
PLFO 364 SOPARS= 17. SWwO  O TAB4O0 «=—s-: 003704 TE125A 024740 
PLF1 SOPAR4= 172270 SWOO = 000001 TAB41 8 003714 TE126 §6©6025166 
POLY = SOPARS= 172272 Sswol = TAB42 003724 TE126A 025234 
PROCNT 023106 SOPARG6= 172274 . TAB4S «=: 005734 TE1268 025710 
PRO = 000000 SOPART= 172276 SWOS = 000010 TAB4S §=—. 003744 7 026226 
PRI = 000040 7 Swoe = TAB46 8 003754 TE127A 
PR2 = 000100 SOPOR1= 172222 SWOS = 000040 TAB47 003764 026670 
PRS = 000140 SOPOR2= 172224 SWO6 = 000100 TAB47A 003774 TEL30A 027146 





K3 
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SEQ 0450 
- SYMBOL TABLE 
| 7F114 021210 TSF15 TST20 105722 TS2601 056412 T1240 
16114 021220 TSF16 TST21 106470 TS2602 056422 T124E 024470 
IT 113242 TSF17 654774 TST22 106700 TS2603 056432 024474 
| THL14 30 TSF2 TST23 107114 TI3F IN 
TIMDEL 116116 TSF20 055146 TST24 107452 TS2605 T14 047140 
TIMEOU ? TSF21 TST25 30 TS2700 056710 TI4FIN 047512 
TIMOUT TsF22 055502 TST26 110372 TS2701 056720 TiS 
TKVEC = TSF23 TST27 111506 TS2702 056730 TiSA 050126 
TMM16A 050514 TST3 TS2703 056740 TISFIN 050154 
THM168 050374 TSF31 057414 TST3O 112630 TS2 750 77660 
THM16C TSF6 053210 TST31 113002 TS2705 056760 UDPARI= 177662 
TMM160 050454 TSF? TST32 113250 TS3000 057220 UDPAR2= 1 
THMI6E 050504 TSLOOP 112072 TST33 113570 TS3001 057230 UDPARS= 177666 
THM16F T 043076 TST34 © 113722 TS3002 057240 UDPAR4Z= 177670 
TM16A 051100 TSMB 40-:« 043116 TST3S 114306 TS3003 057250 UDPARS= 177672 
Tout il TSMC 043126 114472 TS3004 057 = 177674 
TPVEC = 000064 TSMMUO 015036 TST37 115000 TS3005 057270 UDPART= 177676 
TRAPVE= 000034 TSMMU1L 035132 TST4 =: 102162 TS3200 057612 UDPORO= 177620 
TRPFLG 135370 TsMu2 035216 TST40 6115146 TS3201 057622 UDPORI= 177622 
TRPOA TSMMUS 036416 TST41 115450 TS3203 057642 UDPDR2= 177624 
TRPOB 030550 TSMMU4 036716 115616 TS3204 057652 UDPORS= 177626 
TRTVEC= 000014 TSHMUS 037646 TST43 116126 TS3205 057662 UDPOR4= 177630 
TRYMA 030106 TSMMUS TST44 = 116166 T$3300 UDPORS= 177632 
TRYMB 030140 TSMMU7 TST4S 116264 TS3301 060076 UDPORG6= 177634 
TRYMC 030166 TSMMUs 043132 TST46 «6116346 060106 UDPOR7= 177636 
TSO031 7326 TSMMUS 043334 TST47 116562 TS3303 060116 UFOFLG 004116 
112612 TSMM10 TSTS 02546 TS3304 UFDSET= 000001 
TSFP1 TSMM11 044616 TSTSO 116614 TS3305 060136 UIPARO= 177640 
TSFP10 053434 TSMM12 TSTS1 117160 053170 UIPARI= 177642 
TSFP11 TSMM13 045442 TSTS2 117426 TS6DAT UIPAR2= 177644 
TSFP12 053750 TSMM14 046510 TSTS3 117716 1S? 042754 UIPARS= 177646 
TSFP13 054010 TSMM1S 047634 TSTS4 134 TS70A1 053404 UIPAR4= 177650 
TSFP14 054134 050154 TSTSS 120456 TS7DA2 053414 UIPARS= 177652 
TSFP1S TSHM6A 040106 Ts 121032 TS7DA4 ARG= 177 
TSFP16 054454 TSHM6B TSTS7 1300 TS7FIN 043130 UIPAR7= 177656 
TSFP17 TSMM6C 041304 TST6 102732 TSO9FIN 044232 UIPORO= 177600 
052336 TSMM6D 042004 TST60 121452 TYPDS = 104405 UIPOR1= 177602 
TSFP20 TSM16A 050250 TST61 121652 TYPE = 194401 = 177604 
TSFP21 055154 TSM168 050276 TYPOC = UIPOR3= 177606 
TSFP22 TSM16C TST63 123076 TYPON = 104404 UIPOR4= 177610 
TSFP23 055510 TSM16D 050366 TST64 123262 = 104403 UIPORS= 177612 
TSFP246 TSM? 0643064 TST6S 123362 TIOFIN 044616 UIPORG6= 177614 
TSFP25 056004 TSM9 043470 TST66 123544 TL1FIN UIPOR7= 177616 
TSFP26 056122 TSTADD 00 TST? 103172 T114 «=: 021126 UNXPIR 0344 
TSFP27 TSTEND 114304 TS10 044534 T116 022572 UQUIET 004120 
TSFP3 TSTLOC 003162 TS1001 053624 TI2FIN 04 VIREOP 124272 
TSFP30 056772 TSTLUP 110724 T$1002 T122A 023652 VIR1 045730 
TSFP31 057302 TST1 004724 T$1004 T1228 VIR2 047342 
057422 TST10 1 044734 T123A 024210 VIRS 047460 
TSFP33 057674 TST11 103710 T$1101 053740 T1238 024220 veecOR 122 
TSFP4 TST12 045372 T123C VQ@BE1 002676 
TSFPS 052750 TST13 104364 TS14 047114 T1230 024234 VQBE2 002716 
TSFP6 053040 TST14 104700 TS15 T123E 024236 V@PR1 002700 
TSFP7 053214 TSTi5 TS16 T123F V@PR2 002720 
TSF10 053620 TST16 105272 TS16A 050776 T124A 024442 we 002672 


1 046046 wC2 
TSF14 054260 TsT2 101716 TS2600 056402 T124C §=—©: 024460 WLOTRP 135360 





COKDACO KDJ11-B8 CLUSTER DIAG. 


SYMBOL TABLE 
| XBUF_ = 177566 $00u14 
XCBIT 016670 $00W15 
XCSR = 177564 $00M2 
XME100 017674 $00U3 
XME101 017716 $0004 
$APTHD 000232 $00WS 
saTYC 136512 $06 
saTYi 1 $007 
$ATYS 136474 $0048 
$ATY4 136504 $0009 
$AUTOB 001134 $DEVCT 
$BASE 001254 sDE Ve 
$BDADR 001122 $DOAGN 
$BDDAT 001126 s0TBL 
$BELL 001170 $ENDAD 
$COMi 00 SENDCT 
sCDU2 001262 SENONG 
SCHARC 137264 SENULL 
$CKSUR 137742 sENV 
$CHTAG 001100 sENVH 
‘OMS = s€0P 
somes $EOPCT 
SCNTLG 140477 sERFLG 
SCNTLU 140472 SERMAX 
$CPUOP 00 $ERROR 
$CRLF 001175 $EPRPC 
$0B8LK 137732 SERRTS 
$00M0 001264 SERTTL 
$00W10 001310 SETAGL 
$00M11 001312 s€ 

$00M12 001314 SFATAL 


MACRO M1200 18-OCT-84 


001320 $FILLC 
1322 $F ILLS 
001270 $GOAOR 
001272 $GODAT 
001274 $GET42 
001276 $GTSER 
001300 $H0 
001302 sHIBTS 
001304 $HIOCT 
001306 sICnT 
001210 ¢ILLUP 
001256 SINTAG 
135556 sITEnS 
137722 $LF 
1 $LFLG 
135514 $LPADR 
135565 SLPERR 
135562 $MADR1 
001220 $HAOR? 
001221 SMADRS 
135446 SMADR4 
135506 $MAIL 
001103 SMAMS1 
001115 SMAMS2 
136104 sMAMSS 
001116 OMAnts4 
001324 #MBADR 
001112 $*FLG 
001166 sHNEW 
1220 $PSGAD 
001324 S$MSGLG 
001202 SMSGTY 
136732 


VIRTUAL MEMORY USED: 64117 WORDS ( 251 PAGES) 


19746 WORDS ( 


ELAPSED TIME: 2:19:22 
APTOT , APTOT /WL : TOC/-SP/CR=ORION.MLB/ML .APTOT.MAC/DS :GBL 


7S PAGES) 


L3 


16:38 PAGE 64-16 


SEQ 0451 


pm 


CREATED BY MACRO ON 16-OCT-84 AT 16:44 


#7-1033 


7-10660 
7-11051 


7-6137 
7-10676 


10688 
#7-6140 


@21-17747 


#17-17311 
064 -21666 


7-15593 


7-6141 
7-10670 
7-11053 


77-6226 
¢7-10695 
7-86237 
*7-10688 
7-8191 


7-8178 


CREF 


PAGE 1 


*7-6203 
*7-8190 


vo2 


M3 


30- = 30- 188694 


#7-10517 
#7-10520 
7-10524 
#7-10528 


#7-16033 
#7-10514 
7-10996 
7-14412 
7-10518 
7-10521 
7-10525 
7-10529 


SEQ 0452 


ig 


APTOT CREATED BY MACRO ON 16-OCT-64 AT 16:44 PAGE 2 
SYMBOL CROSS REFERENCE CREF v02 
SYMBOL VALUE REFERENCES 
#7-10651 7-10695 
ACE 28000006 07-1034 @7-14906 
_ ACT =8000007 #7-1035 #7-11142 
ADCC = eeeeee 7-4136 
ADOL SB 111470 aT teed ferot 26-16366 *26-18376 26-183577 #26-18390 *27-18550 27-18612 27-18617 
27 -18629 - 
ADOT 052160 7-10669 7-10675 7-10681 7-10687 7-10694 #7-10708 
ADOTRP 135234 7-8094 7-6118 @62-21583 
ADOWO 86 =_:« 000000 6-454 6-4 
ADDW1 = 000000 6-454 6-454 
ADOW10 = 000000 6-454 6-454 
ADOW11 = 000000 6-454 6-454 
ADOW12 = 000000 6-454 6-454 
ADOW13 = 000000 6-454 6-454 
ADOW14 = 000000 6-454 6-454 
ADOW1S = 000000 6-454 6-454 
ADOW2 = 000000 6-454 6-454 
ADOWS = 000000 6-454 6-454 
ADDWS =60= 000000 6-454 6-454 
ADOWS = 000000 6-454 6-454 
ADOWG = 000000 6-454 6-454 
ADOW7 = 000000 6-454 6-454 
ADOWS = 000000 6-454 6-454 
ADOWS = 000000 6-454 6-454 
ADEVCT = 000000 6-454 6-454 
ADEVM = 900000 6-454 6-454 
AENV = 000000 6-454 6-454 
= 000000 6-458 6-454 
AFATA = 000000 6-454 6-454 
ALCC = eseees 7-4417 
ALLCTR 003152 @7-1017 #24-18031 2424-18045 *24-18055 +*24-18076 
ALLEND 122620 S2- - 
ALROTS 021512 @7-5220 
ALRITS 021570 @7-5246 
ALR2TS 021646 @7-S272 
ALRSTS 021724 07-5296 
ALR4TS 022002 07-5324 
ALRSTS 022060 @7-5350 
| ALTREG = sesses 7-5128 
| ATRL = sesees 7-$245 
| ATR = seeses 7-$271 
| ALTRS = sessee 7-$297 
ALTRG = eeseee 7-§323 
ALTRS = seeeee 7-5349 
| AMADR1 = 000000 6-858 6-454 
| AMADR2 = 000000 6-454 6-454 
APAORS = 000000 6-454 6-454 
AMAORE = 000000 6-454 6-454 
aewetsi = 000000 6-454 6-454 
AMAMS2 = 000000 6-454 6-454 
ANeNSS = 000000 6-454 6-454 
aeweets4 == 000000 6-454 6-454 


| 


SEQ 0453 


a mm a ee ee ee ee ee 


B4 


AaPTOT CREATED BY MACRO ON 18-OCT-84 AT 16:44 PAGE 3 
SEQ 0454 
SYMBOL CAOSS REFERENCE CREF vo02 
SYMBOL «(VALUE REFERENCES 
# 000000 6-454 6-454 
AASGLG = 000000 6-454 6-458 
AMSGTY = 000000 6-454 6-454 
AMTYP1 = 000000 6-454 G- 858 
ANTYP2 = 000000 6-454 &-454 
ANTYPS = 000000 6-434 6-454 
_ AATYP4 = 000000 6-454 6-454 
APASS = 000000 6-454 6-454 
APRIOR = 000000 6-454 
aPTCsu = 000040 €64-21667 64-21668 
APTENV = 000001 oh deeas 42-19731 45-19942 47-20121 48-20182 49-20261 64-21666 64-21667 #64-21667 
APTSIZ = 000200 7-1149 064 -21667 
APTSPO = 000100 64-21667 €64-21667  64-216686 
s eseese 7-4451 
= 000000 6-454 6-454 
ATESTN = 000000 6-454 6-454 
AMIT = 000000 6-654 6-454 
AUSUR Ss =:« 000000 6-454 6-454 
AVECT1 = 000000 6-454 6-454 
AVECT2 = 000000 6-454 6-454 
All 2 eseses 7-2716 
A126 07-6134 7-6142 
ASS s eeeese 7-3012 
BA 002670 07-924 $2-20594 S2-20630 5$7-20961 62-21503 62-21514 
| BACDAT 103126 10-16613 #10-16635 
, BA2 002710 e7- - 
6811 = eecese 7-2758 
6822 s eeccee 7-2675 
, BCCC = eecses 7 
| BCR * 177524 07-91 40 - 19648 
| BCSR * 177520 07-953 08-16337 08-16348  °09-16437  29-16440 ¢9-16477 *9-16480 *9-16542 *9-16554 
@10-16609 ©10-16632 ¢11-16751 ©11-16776 °12-16846 °12-16871 °15-16936. ©13-16944 1535-16952 
©13-16960 ©014-17016 ©14-17036 ¢15-17124 °15-17161 ©16-17216 °16-17226 : °17-17295 +¢17-17304 
©18-17362 2186-17391 ©019-17447 219-17472 20-175 20-17591 ©20-17597 220-17621 °20-17625 
020-17648 021-17737 ¢21-17749 22-1 022-17626 23-17903 2353-17951 «24- 7 2024-1 
025-18126 25-16 - 25-161 €26-18241 226-1 - 626 - e27 - 18494 
e27- e27- 027-186636 29-16743 2029-16744 029-16751  29-16753S 29-16 29-16758 
029-16765  29-186766 029-16773  29-16774 2029-18779 29-16 029-18766 29-16786 °29-16791 
629-18 30-18637 - 030-16839 2350-18901 - 31-16923 °31-16924 °31-186925 
0311-16949 -i 032-19023 °32-19077 3353-19129  34-19213 ©34-1923S °34-19248 35-19510 
35-19315 ¢35-19316 35-19317 °35-19321 35-19322 °35-19337  36-19381  36-19386 °36-193587 
©36-19548 - 036-19393 36-1 0356-19403 036-19405 36-19420 %-1 2036-19430 
37-19464 37-19469 037-19470  36-1953S  36-19536  36-19543 °38-19548 °36-19550 °36-19555 
0386-19563  46-20046 2046-20047 246-20077 +486-20176 - 049-20265 2049-20268 250-20426 
$0-20431 +50-204635 ©50-20440 *50-20450 °50-20451 °52-20559 °52-20562 °52-20579 °52-20562 
0352-20603 52-20606 °52-20636 °52-20639 °52-20677 *52-20680 57-21004 °*57-21006 *57-21026 
©57-21032 5357-21051  %36-21203 °*64-21665 °64-21665 %64-21666 
6CO0O s 6606s 7-2637 
6C1il1 s eeeese 7-2790 
6C22 * seseee 7-2919 
BDR * 177524 07-952 048-20193 +*48-20207 


C4 


APTOT CREATED BY MACRO ON 18-OCT-84 AT 16:44 PAGE 4 
SEQ 0455 

SYMBOL CROSS REFERENCE CREF vO02 

SyvmBOL ~VALUE REFERENCES 

BFA 052212 7-10665 7-10671 7-10677 7-10663 7-10690 7-10697 7-10714 

OF ACI 052000 7-10666  @7-10669 

aACc2 052020 7-10672 #7-10675 

OF ACS 052040 7-10676 @7-10661 

BF ACS 052060 7-106864 7-10687 

BF ACS 052102 7-10691 #7-10694 

BF AE 7-10696 7-10701 #7-10724 

ere 7-10715 7-10717 7-10719 7-10721 

BGNTLP 111006 026-1 26 -18370 

| BITO * 000001 5-442 

BITOO 8 = 000001 -@A? 5-442 7-10160 12-16870 16-17220 19-17446 19-17464 20-17630 20-17640 
43-19795 4353-19796 44- -20049 46-20057 - 46- 46-20176 49-20257 
49-20374  49-203866 %50-20436 52-20622 57-21005 62-21486 62-214866 62-21500 62-21505 
62-21519 62-21524 

BITO1L = 000002 $-442 9-16445 9-16485 23-17902 23-17909 23-1 23-17934 

BITO2 = 000004 §-442 9-16435 9-16539 9-16545 - 11-16755 11-16761 11-16771 
12-16851 12-16861 12-16867 153-16939 13-16955 14-17019 14-17024 14-17029 14-17034 
1S$-17131 15-17147 16-17223 - 16047 -18059 24-18072 27-16575 27-186561  27-18566 
42-19737  42-19738  42-19774  43-19793 43-19796  44-196866 44-19691  44-19907 45-199535 
45-1 45-19963  46-20045 46-20065 46-20071 46-20086 46-20088 47-20125 47-20140 
a ss 47-20159  49-20269 49-20374  49-20380 52-20563 52-20563 %2-20607 S2- 

BITOS = 000010 -442 $-4a2 77-6638 9-16476 27-165635 29-16766 

BITOS = 000020 $-442 7-7685 77-9694 7?- 2353-17918 235-179435 24-1 - 
27-18497  23-18775 29-16774  29-186776  29-16779  29-18760 29-186786 29-18788 29-18791 
49-20275 49-20306 53i- 

BITOS = 000040 5-442 $-442 7-10167 9-16457 30-18638 31-1 35- 62-21410 

8IT06 = 000100 -4a2 3-442 77-1138 7-7721 17-7744 1215-17127 15-17142 15-17144 16-173835 
19-17448  19-17464 27-16491 30-18636 31-18924 35-19127 34-19211 34-192168 34-19222 
3534-19225 34-19235 34-192045 34-19262 35-19306 36-19579 -19%422 =%-1 36-19429 
37-19462 3537-19473 37-19485 3536-19533 3686-19551 3686-19555  368-195635 38-19570 3686-19584 
40-19646 44-19639 44-19640 44-196435 44-19044 44-19648  44-19651  44-19659 44-19675 
44-19662 44-19901 45-19966 45-19977 45-19979 45-19996 486-20189 62-21404  64-21664 

BITO7 = 000200 05-442 77-1189 11-16749 17-17296 20-17562 20-1 20-17613 26-16236 
30-168368 33-19146 34-1923 -1 3537-19462 40-19646  46-20038 51-20476 51-20496 
S2-20543 3$3-20717 34-20799 : 36-20890 57-20969  62-21407 

BITOS = 000400 42 77-9657 19-17474 25-16127 25-186129 26-1 26-186362 27-186536 
27-186636 50-20435 ° 64-21665 

BITO9 = 001000 5-442 -442 14-17015 14-17037 19-17450 25-186126 25-16130 26-18276 46-20047 
49-20363  49-20394 52-20576 62-21423 62-21500 62-21519  64-21665  64-21666 

BIT1 = 000002 5-442 

BIT10 = 002000 wow) 16-17216 17-17296 19-17448 19-17464  S50-20436 50-20439 51-20493 51-20495 

BITi1 = 004000 -442 7-$140 7-$151 77-3152 77-5160 7-5187 7-3194 7-$372 46 - 20063 
46-200864 64-21665 

BITi2 = 010000 5-442 32-19011 33-19129 34-19213 35-19510 35-19326 35-19317 35-19321 35-19522 
a 3536-19403 36-19405 36-1 36-19424 37-19464 37-19470  38-19535 5S2-20596 

BIT13 = 020000 oe 36-19361 36-19368  36-193869  36-19393 36-19394  36-19396  46-20065 46-20084 

BIT14 = 040000 -442 47-20155  64-21665 

BIT15 = 100000 5-442 12-168643 12-168647 12-16854 12-16857 23-17915 23-17940 24-18034  24-18036 


ee 


CREATED BY MACRO ON 16-OCT-84 AT 16:44 


SYMBOL VALUE 
BIT2 © 
BITS # 000010 
BIT4 = 000020 
BITS = 000040 
BIT6 = 000100 
BIT7 . 
BITé 3 
BIT9 = 001000 
BI00 = eesees 
043726 
044116 
BPTO s eseeee 
BPTOA 030640 
BP TOB 030646 
@PTVEC = 000014 
escc = eeseee 
BT = seeees 
BTcc s eesese 
BTER 051342 
BTEXP 003100 
6TGO 051142 
BTO = sesees 
BTRES 003110 
BTTST 051606 
BTTSTE 051634 
BT1 s eeeeee 
BYPARA 103434 
BES = eesese 
CBIT s eseese 
CB44 s seeeee 
CCHPAS 003032 
CCR = 177746 
' CCRTBL 106426 
CHECK 015322 


PAGE 5 
SEQ 
CREF v02 =e 

4%- 46-20084 47-20155  49-20390 52-20621 
22-17808 22-17619  22-17629  24-18062 
22-17805 22-178616 22-17625 
7-1146 
7-1148 47-20142 59-21259 
47-20142 5$9-21259 
59-2 
07-9401 
17-9326 07-9464 
@7-7024 
07-7027 
7-10534 7-10536 7-10539 
7-10495 7-10511 7-10514 7-10517 7-10520 7-10523 7-10527 7-10531 
7-10535 7-10337 7-10644 ¢7-10646 *7-10647 *7-10648 %7-10649 7-10650 
7-106356 7-10638 7-10660 7-10662 ¢7-10703 *7-10704 ¢*7-10705 +*7-10706 
ye th 7-10710 ¢7-10711 7-10714 7-10716 7-10716 7-10720 
7-10496 ¢7-10512 °7-10515 ¢7-10518  +*7-10521 7-10531 7-10533 7-10535 
e7-10548 °e7-10555 *7-10562 +*7-10569 ¢7-10577 +7-10565 7-10608 7-10610 
7-10614 7-1 ©7-10664 ¢7-10670 ¢7-10676 %7-10682 +¢7-10689 +*7-10696 
7-10716 7-10716 7-10720 
7-10556 7-1 7-10570 7-10578 7-10586 #7-10608 
7-10611 7-10613 #7-10615 
#11-16783 
e7-1160 e7-1162 o7-1164 o7-1166 7-16272 8-1 - 9-16531 
11-16741 - 1353-16920 14-17007 15-17112 16-17 17-17278 1686-17366 
20-17567 21-17723 22-17793 23-17691 24-18015 25-16111 26-162 27-18485 
50-20417 5$1-20470 5$2-20537 5$7-20963 5$7-21057 *57-21059 
7-16262 7-16265 °6-16336 °6-163538 8-1 8-16541 29-16433 +9-16455 
09-164935 9- ©9-16541  ©11-16749 ©11-16777 ©15-16935 1535-16951 ¢14-17015 
©15-17125 ¢15-17127 ©15-17142 ©15-17144 ¢15-17154 ©15-17159 *16-17218 *16-17220 
©17-17296 ©186-173635 ©16-17365 019-17448 2019-17450 ©19-17462 219-17464 2*19-17466 
©19-17474 ©20-17560 *20-17562 -1 -17 20-176 #20-17613 20-17626 

-17638 ©20-17640 20-17650 21-17738 ©21-17740 21-17747 3-1 #23-17909 
23-17934 -18029 424-16047 224-1 @24-18072 224-1 #25-18117 *26-18245 
27-16496 ¢27-16529 +49- 049-20363 249-20394 250-20436 +50-20439 250-20449 
51-20495 ©51-20496 °51-20510 *52-20576 *52-20576 58-21190 
Bt ih a 20-17624 #20-17654 


ae se es 


OO ooo —_ —— 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 6 
SEQ 0457 
SYMBOL CROSS REFERENCE CREF vo2 
SYMBOL VALUE REFERENCES 
CHECK1 015400 7-38693 @7-3912 
CHECK2 015456 7-3913 97-3932 
CHECK? 053362 7-10990 7-10994 7-11002 7-11 #7-11012 
CHEC10 053602 7-11054 7-11056 7-11066 7-11070 #7-11076 
CHE: 7-11721 7-11730 7-11739 7-11 7-11759 #7-11770 
CHEC27 056672 7-11629 7-11643 7-11857 #7-11866 
CHECSO 057202 7-11925 7-11939 7-11953 #7-11962 
CHEC 057574 7- 7-12071 7-12080 #7-120869 
CHECSS 7-121 7-12153 7-12162 #7-12171 
CHEK7 #7-11015 7-11017 
CHK10 053614 7-11078 #7-11061 
CHK7 053374 7-11014 #7-11017 
CH10 053606 @7-11077 7-11061 
CKSWR «= 104407 64-21 64-21666 64-21666 #64-216735 
CLRD = eeeee8 7-14923 
CLRI = eesees 7-14957 
CMPD = eeenee 7-13324 
CMPRIN 064372 7-13338 7-13345 7-13352 7-13358 #7-133578 
COUNT 003120 @7-1011 07-6799 07-6805 07-6806 *7-6612 e7-66168 e7-6819 7-12271 7-12316 
~ 7-12396 7-12431 7-12468 7-12507 7- 7-12555 7- 7- 
7-12619 7-12034 7-12668 7-12683 7-12713 7-12725 7-12760 7-12770 7-12784 
7-12795 7-128630 7-12656 7-12688 7- 7-12927 7- 5 T- 7-12995 
7-13027 7-13039 7-13073 7-13103 7-13124 7-13154 7-13175 7- 7-13240 
7-13264 7-13296 7-13316 7-13403 7-13639 7-13806 7-14020 7-14193 7-14407 
7-14416 7-14643 7-1 7-14748 7-14876 7-14944 7-15306 7-15487 7-15606 
7-1 7-16073 263-21646 *63-21651 2635-21652 
CPEREG = 177766 07-967 07-6844 7-6858 07-6866 07-6880 #7 -6890 e7-6899 #7 -6906 #7-6917 
e7-6931 07-6942 *7-6955 07-6967 @7-6982 e7-6990 #7-7005 #7-7015 e7-7028 
e7-7040 07-7056 67-7676 7-7685 07-7694 07-7711 7-7721 07-7730 77-7744 
07-7756 07-7768 77-7761 o7-7764 07-7796 #7-8090 #7-8110 07-9963 #7-10181 
7-10187 %7-10197 
CPUTST = esesee 7-1194 
CR = 000015 05-442 64-21668 64-21668 
CRLF = 000200 5-442 7-1162 7-1162 64-21668  64-21668 
CSRi 002664 @7-922 S1-20479  S52-20546 52-20596 5$2-20632 53-20719 53-20724 54-20801 54-20609 
- $6-20913 %$7-20967 5$7-20990 5$7-20997 57- 62-21447 62-21472 62-21502 
62-21517 62-21521 
CSR1i2 002704 @7-932 $6-20692 %56-20910 57-20972 57- $7-20992 57-20996 57-21000 62-21451 
CsR2 07-923 $2-20596  5%2-20671 53-20739 53-20768 54-20616 55-20659 55- 1 
S6-20912 %57-20979 62-21500 62-21505 62-21506 62-21519 62-21524 62-21525 
R22 002706 07-933 5$6-20916 57- 
CTSscc s seeee6 
111504 024-18030 24-18035  24-18037  24-18039 %24-18040 +*24-18050 24-1 24-18057 24-18060 
24 -18064 -18068 ©24-16071 *24-18076 *26-18302  26-18309  26-186323 26-18330 26-18352 
26-16333 26-18337 426-16357 +*26-18361 -1 ©26-18364 226-18366 26-18367 %26-18369 
26-16381 . 7-1 27-1 27-16573  27-16579 27-18586 27-18591 %*27-18606 
@27-186612  27-16613 «27-16615 *27-16617 27-16616 %*27-18620 27-18634 
111476 626-1 26-16322  26-16324 %*26-186345 -18347 @26-16393 27-18551 27-18572 *27-18593 
C1i21A 023242 717-5662 07-5665 
C1218 023262 7-5667 67-5670 
C121c 023302 77-3672 67-5675 
OAP 104670 15-17118 #15-17165 





ee —— me a ee ea ee ei 
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APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 7 
SEQ 0456 
SYMBOL CROSS REFERENCE CREF vo02 
SYMBOL VALUE REFERENCES 
DATA 002674 07-926 S$2-20657 S2-20674 57-20985 62-21497 
| DATA2 002714 07-936 57-20986 
_ DATBO 122110 52-20584 #52-20569 
| DATI 12. $2-20623 #52-20651 
DATVER 135414 7-12270 7-12315 7-12358 7-12397 7-12430 7-12467 7- 7-12539 7-12554 
7-12567 7-12561 7-12616 7-12633 7-12667 7-12682 7-12712 7-12724 7-12759 
7-12769 7-127863 7-12794 7- 7-12657 7-12687 7- 7- 7- 
7-12979 7-12994 7-13026 7-13038 7-13072 7-13102 7-13123 7-13153 7-13174 
7-13204 7-13239 7-13263 7-13295 7-13315 7-13402 7-1 7-14192 -14642 
a 7-14651 7-14747 7-14943 7-15305 7-15607 7-158664 #63-21649 
DATVFR 135376 -13638 7-14019 7-1 7-14415 7-148675 7-15486 7-16072 4063-21644 
DAT1 1 63-21647 #63-21652 63-21655 
DAO = eseeee -2535 
occc = eesese 7-4061 
OCOUNT 111460 07-7973 e7-7991 - @24-16073 *26-186303 26-16304  26-18328 26-18341 26-16351 
026-186356 €26-16386 27-1656 27-18594 27-18599 *27-18607 27-18621 
OOISP = 177570 - 6-454 7-1149 
DELAY 114270 32-19044 32-19073 #32-19064 
DH1 132135 -460 7-465 7-470 7-535 7-540 7-545 7-560 7-565 7-560 
7-585 7-590 7-595 7-605 7-610 7-615 7-625 7-635 7-640 
7-670 7-675 7-680 7-665 7-690 7-695 7-700 7-705 7-710 
7-715 7-725 7-730 7-735 7-740 7-750 7-755 7-765 7-770 
7-775 7-780 7-785 7-790 7-795 7-810 7-815 7-835 7-845 
7-850 7-855 7-860 7-665 7-870 7-875 7-880 7-885 7-890 
7-895 7-900 7-905 7-910 #586 -21159 
DH105 133076 7-800 7-805 7-825 7-830 #56 -21161 
0H115 133130 7-840 #56-21163 
134 133205 7-915 058-211 
OHO4 132421 7-555 #58 -21167 
OH27 132465 7-570 -575 058 -21169 
DHS 132162 7-475 7-515 -530 7-600 7-660 7-665 7-760 7-820 #58-21161 
OH41 132530 7-620 #58-21171 
OH43 132601 7-630 #58-21173 
0H47 132701 7-645 7-650 7-655 #58 -21175 
OH5 1 7 7-480 7-485 7-520 7-525 7-550 #58 -21163 
OH6S 132766 7-720 #58-21177 
OH7 132346 7-490 7-495 7-500 7-505 7-510 #56 -21165 
OH72 133032 7-745 #58 -21179 
OISPLA 001142 6 - 454 07-1149 67-1149 64-21665 64-21666 
OISPRE 000174 05-444 7-1149 
OIVD = eeeeee 7-13656 
OIvF = sesese 7-13413 
GAAP AR 1 - #50 -20435 
OMARD 134766 $2-20656 52-20670 #62-21514 
ORATRAN 134704 51-20496 52-20556 -20577 S2-20597 52-20633 #62-21497 
ono = seese6 7-2517 
OM27 Ss se6ee6 7-2561 
OP AREN 121414 S5O0- 850 - 20444 
OSuR * 177570 05-442 6-454 7-1149 
0SO Ss 666666 7-2557 
| OT1 133342 7-461 1-466 7-471 7-536 7-541 7-546 7-561 7-566 7-581 
7-586 7-591 7-596 - 7-611 7-616 7-626 7-636 7-641 





a rn 


APTOT 


SYMBOL CROSS REFERENCE 
VALUE 


SYMBOL 


CREATED BY MACRO ON 18-OCT-84 AT 16:44 


052634 
052644 
052650 
003034 
eseces 


7-13437 


#58 -21134 


7-13446 
7-13519 
7-10849 


7-108677 


e7-1149 


56 -21189 
7-831 


7-506 
7-13696 


7-13454 
7-13527 


7-691 
7-741 
7-79 
7-671 


#58-21207 


7-551 


7-S11 


7-13704 


7-13463 
7-13536 


7-696 
7-751 
7-611 
7-876 


#586-21191 


#58 -21192 
7-13712 


7-13471 
7-13544 


wae nes = a ee ee + ee + 


7-13720 


7-13479 
7-13553 


7-706 
7-766 
7-836 
7-886 


7-13728 


7-13487 
7-13562 


SEQ 0459 


7-13737 


7-13495 
7-13571 


a 
- 
——-— 


H4 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 9 
SEQ 0460 


_ SYMBOL CROSS REFERENCE CREF v02 
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APTOT CREATED BY MACRO ON 18-OCT-84 AT 16:44 PAGE 10 
SEQ 0461 
SYMBOL CRUSS REFERENCE CREF  vo2 
SYMBOL VALUE REFERENCES 
 emas 126300 7-629 @58-21100 
_emea 1 7-634 @58-21101 
ems 126371 7-639 058-211 
| Eme6 126453 7-644  058-21103 
| Ena? 126543 7-689 @58-21104 
| eMS 124436 7-479  @58-21070 
ESO 7-654 @58-21105 
| €rS1 126653 7-659 @58-211 
EMs2 7-664  058-21107 
EMSS 126743 7-669 #58-21108 
ense 126777 7-674 @58-21107 
ESS 7035 7-679 @58-21110 
EMS6 127071 7-684 0586-21111 
EMS? 127115 7-689 @58-21112 
Ew 71 7-484 058-21071 
E60 127147 7-694 0586-21113 
En61 127215 7-699 058-21114 
En62 7-704 @58-21115 
En6S 127315 7-709 0538-21116 
Ene4 7-714  @58-21117 
EMS 127405 7-719  @58-21118 
ENGG 127455 7-724 58-2119 
€N67 127514 7-729  @58-21120 
EN? 534 7-489 @58-21072 
EM70 127551 7-734  @58-21121 
EM71 127602 7-739  @58-21122 
EN72 7636 7-744  @58-21125 
ENTS 127674 7-749 058-21 
EN74 127720 7-754 0538-21125 
ENTS 127751 7-759 58-21126 
ENTE 130002 7-764 0538-21127 
E77 130052 7-769 @58-21128 
EMDHRT —-103116 10-16611 @10-16631 
EMDLUP 111424 26-1837 
EMDMOV 111506 26-18235 26- 26-18260  26-18280 #26-18398 
ENDTAG 1 27-18488 27-16493 27-16514 27-16533 4627-18636 
EMOTLP 111374 26-18305 026-1637 
ERR 135374 063-21623 
ERRCNT 00 7-992 #32-19036 32-19048 $8-21210 
ERRFP =: 135372 $63-21622 
ERROR = 1 7-1223  -7-1229Ss«7-1247=Ss«s7-1251s«s7-1267 ~~ 7-1292 —-7-1303 
7-1372  (7-1377 +=—«-7-1382,—Ss«7-1393°=s«7-1398)= 77-1403 07-1408 = 77-1419 = 7-428 
7-4 7-1434 «= 7-144500s7-14500s7-14850—s7-1 7-1471 = 7-1476—Ss« 7-148 
7-1486 7-1498 7-1503 7-1508 7-1513  7-1533  7-1538 += 77-1552. 7-1558 
7-1572  7-1579 17-1595 77-1608 7-2 72-1631  (7-1647 77-1657 «7-674 


2066 2082 
7-2110 7-2129 77-2134 7-2153 7-2162 7-2183 7-2192 7-2214 7-2221 
17-2242 77-2251 7-2274 7-2268 7-2311 7-2317 7-2343 7-2348 7-2369 





CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 11 


APTOT 


| SYMBOL CROSS REFERENCE 


VALUE 


SYMBOL 


eehaeecuansnasee 


Ne 


SPREE ber f Epes 3 
Bb te Pete Go bet to 

SSSSE ECC ECEe CE EC 8 S 
PF Pe PF PF P&P PP F FF  & 








CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 12 


APTO™ 


| SYMBOL CROSS REFERENCE 


SYMBOL VALUE 


oO ‘ee 
FRR RRR RRR RRR 


NO nNonnnr ~~ QMONHAQMAA 
BT PERRO EELETE AS PECLEEE GE EBLE LE EEE EG 
Peer rererer ne ~~ e ~~ 


a RR 
—-—--——— 


L4 =A 
APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 13 
SEQ 0464 
SYMBOL CROSS REFERENCE CREF vo2 
SYMBOL VALUE REFERENCES 
7-13292 7-13298 7-13312 7-13316 7-13395 7-13405 7-13609 7-13616 7-13623 
7-136354 7-13641 7-13650 7-13776 7-13763 7-13790 7-138601 7-1 7-13617 
7-13990 7-13997 7-14004 7-14015 7-1 7-14032 7-14163 7-14170 7-14177 
7-141868 7-14195 7-14205 7-14376 7-14363 7-14399 7-14402 7-14409 7-14418 
7-14427 7-14612 7-14619 7-14626 7-14638 7-14645 7-14654 7-14663 7-14743 
7-14750 7-14754 7-14848 7-14655 7-14862 7-14871 7-14878 7-14888 7-14913 
7-14917 7-14946 7-14951 7-14976 7-14960 7-15006 7-15010 7-15014 7-15020 
7-1 7-15050 7-15054 7-1 7-15068 7-15092 7-15096 7-15102 7-15128 
7-15132 7-1513%6 7-15142 7-15170 7-15174 7-15176 7-15164 7-15210 7-15214 
7-15216 7-15224 7-15252 7-15256 7-1 7-1 7-15295 7-15300 7-15306 
7-15462 7-15489 7-15496 7-15603 7-15610 7-15617 7-15634 7-15641 7-15648 
7-15860 7-15667 7-15677 7-16045 7-16052 7-16059 7-16066 7-16075 7-16065 
7-16216 7-16221 7-16 7-16266 7-16292 7-16296 6-16345 9-16447 9-16451 
9-16455 9-16459 9-16465 9-16469 9-16472 9-16474 9-16487 9-16489 9-16491 
9-16547 9-16552 10-16627 11-16757 11-16763 11-16767 11-16773 11-16776 12- 
12- 12-16869 -16964 14-17021 14-17026 14-17031 14-17036 15-17122 15-17133 
15-17137 15-17141 15-17149 . 15-17153 15-17156 15-17166 16-17225 16-17233 17-17303 
17-17315 17-17321 17-17324 16-1 1686-17400 16-17 16-17409 19-17452 19-17457 
19-17469 20-17567  20-17607 20-17616 20-17635  20-17645 21-17744 21-17757 22-17807 
22-17811 22-17818 22-17622 22-17827 22-17632 23-17920 2353-17925 23-17945 2353-17948 
24-1 24-18070 25-18133  26-16272 27-186524 -18683 26-18695 26-18705 29-186755 
29-18760 29-18769 29-16777 29-16783 29-18790 30-18857 W%0-1 30-1868665 30-16866 
- d- 31-16941 31-16947 32-19052 3353-19139 3353-19157 33-19161 34-19225 
34-19236 34-1 34-19247 34-19251 34-19255 34-19269 35-193520 -1 35-19333 
36-19392  36-19397 36-19415 36-19419 36-19426 37-19484 37-19487 3868-19574 3686-19578 
36-19562 39-19607 39-19610 39-19615 40-19661  41-19696 41-19700 42-19741 42-197635 
42-19769  42-19773 43-19600 -198642 44-19846 44-19650 44-1 44-19667  44-19692 
45-19970 45-19964  46-20051 46-20066 46-20072 46-20087 47-20141 47-20145 47-20156 
49-20383 49-20393 3530-20447 51-20499 51-20506 52-20565 - S2- - 
S$2-20609 S2-20612 S2-20642 S2-20645 52-20659 52-20675 52-20676 Se- 53-20744 
S3-20772 S4-20621 55-20862 %6-20921 57-21024 57-21050 62-21406 62-21409 62-21412 
62-21532 62-21590 6353-21616 
ERROUT 102056 7- o7- 
ERRVEC = 000004 65- 7-1149 e7-1149 07-1149 e7-1151 e7-1152 33-19134 233-19135 +33-19136 
#33-19142 35-1 2035-19330 +235-19331 +«35-19336 40-19654 240-19655 -19656 240-19664 
49-20267 249- 9-20269 249-20304 49-20347 2249-20348 249-20349 249-20362  62-21429 
062-21430 2062-21431 °*62-21475 64-21665 %*64-21665 %*64-21665 %*64-21665 
ERTYPE 133672 -21223 64-21 
ET s sees6e6 77-7425 
ETO = seeeee 7-7454 
EXBAD 111440 - 26-18336 #26-16380 
EXBAD2 27-16577 27-18565 27-16590 #27-1866355 
EXITST 111450 26-18376 026-16362 27-186511 27-186517 
EXPBOT 106446 20-17596 #20-17664 
EXPDAT 111462 s7-5070 e7-5060 7-5093 07-5418 7-5419 7-5426 7-5430 07-5963 27-5964 
7-5961 67-6228 7-6247 7-6251 026 - 16387 
EXPIR1 034 17-7832 07-7643 
EXPTBL 103154 10-16607 #10-16646 
EXPWDT 106436 20-17577 #20-17659 
FACU Ss 66606 7-10624 
F INNOP 021232 7-S091 @7-5125 
FINI 052334 7-10743 #7-10752 


5) 7 


M4 


16:44 PAGE 14 


SEQ 0465 
CREF v02 
07-5643 
#7-5615 
7-6028 #7-6120 
#7-6551 
07-6792 


17-7668 o7-7673 7-8092 #7-6112 *7-6367 27-8442 *7-8630 
*7-86790 7-86919 uy oe e7-9147 #7-9173 *7-9185 #7-9205 


¢7-13561 7-13570 17-1360? 7-13614 7-1 07-13669 07-13678 
o7-13708 e7-18711  07-13719 07218727 e7-13786 0 7.18774 713781 
~: - eines ohibeee oPcibest.  Pibees | Bk 
e7-13916 07-13924 e7-1 e7-1 e7- > ~ 
37-10088 7.14066 07218078 07214082 9 7-14090 07214086 07 -14106 


o7-15638 e7-15646 e7-15654 *7-15662 #7-15670 07-15678 07-15687 
#7-15714 *7-15723 ¢7-15731 ¢7-15739 *7-15748 #7-157S5S7 #7-15765 


aaa eae 


N4 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 15 | 
SEQ 0466 

SYMBOL CROSS REFERENCE CREF v02 

SYMBOL VALUE REFERENCES 


#7-15774 #7-15762 *7-15791 7-158632 7-15639 7-15669 +¢7-15697 *7-15904 +7-15911 
#7-15918 7-15925 ¢*7-15932 *7-15939 +*7-15946 *7-15953 +*7-15960 +7-15967 «7-15974 
#7-15961  ¢7-159868 +¢7-15995 +%7-16002 7-16043 7-1605¢ 7-16077 + *7-16105 ¢7-16112 
#7-16119 ¢7-16126 62-215868 *62-21607 


FLO 003062 @7-1005 07-6142 7-8143 7-6175 7-8213 7-8224 77-6235 7-8246 7-8275 

FLOAT 003052 @7-1004 7-8129 7-8134 7-8176 7-86187 7-8200 7-8274 7-8290 7-6315 
7-8328 7-6341 

102534 9-16430 #9-16496 

FPPTST = eesese 7-1045 7-10470 63-21612 

FPTS1 = eeeses 7-10729 

FPTS10 = seeeee 7-11039 

FPTS11 = eeeees 7-11103 

FPTS12 = seeee0 7-11136 

FPTS1S = seseee 7-11156 

FPTS14 = sesees 7-11197 

FPTS15 = eeeses 7-11239 

FPTS16 = seeese 7-11297 

FPTS17 = eesees 7-11349 

FPTS2 = seeese 7-10755 

FPTS20 = sesees 7-11406 

FPTS21 = eseses 7-11459 

FPTS22 = seeses 7-11517 

FPTS23 = sesese 7-11566 

FPTS24 = seeeee 7-11607 

FPTS25 = sesees 7-11660 

FPTS26 = seeseee 7-11702 

FPTS27 = seseee 7-11605 

FPTS3 = seese6 7-10784 

FPTS3O = sessees 7-11901 

FPTS31 = seeses 7-11997 

FPTS32 = sesses 7- 

FPTS3S3 = seeees 7-12124 

FPTS4 = seesese 7-10619 

FPTSS = eeese6 7-108689 

FPTS6 Ss seeee6 7-10920 

FPTS7 = sesees 7-10975 

FPVEC = 000244 @7-1039 67-12637 ¢7-128665 %*7-12697 *7-13063 27-13110 ¢7-13131 *7-13161 +*7-13162 
07-13594 *7-13761 °7-13975 *7-14146 +7-14359 %*7-14595 ¢7-14727 *7-1486335 +*7-15001 
#7-15041 7-15083 ¢7-15123 *7-15165 *7-15205 ¢7-15247 7-15267 *7-15466 +*7-155687 
#7-15616 *7-16026 +%7-16200 

FRSTST 004726 #7-1210 

FSRCMO = seesee ° 

FSTADOD 111500 @26-18297 26-18300 26-18302 26-18357 026-16394 *27-186556 *27-18559 27-18562 27-18608 

FWDSEQ 111466 #26-16265  26-16295 26-16359 26-16371 *26-16373 26-16375 026-16389 *27-18549 27-186554 
27-18610 27-18624 27-186626 +27-16626 

GNS =s sesesee 5-844 5-444 7-1162 64-21673 64-21673 64-21673 64-21673 64-216735 64-21675 


64-21673 64-21673 64-21675 64-21675 64-21675 64-21673 64-21673 64-21673 64-21675 
64-21673 64-21675 64-216735 64-216735 64-21675 
, GOODAD 003020 07-991 @24-18046 224-16049 24-16064  24-18068 2924-18075 





CREATED BY 


eecese 
eecces 
suoeee 
030346 
030354 


000020 
033500 
eecese 
Seeoae 


MACRO ON 16-OCT-64 AT 16:44 


3406 
64-21668 


67-7050 
07-7053 
07-10914 


07-7075 
07-7078 


@7-10657 
07-10683 


1353-16925 


18-17379 
16-17403 


@7 -6951 
07 -6954 
o7-1149 


PAGE 16 
CREF vO02 
7-16297 9-16439 9-16479 9-16544 9-16549 
11-16770 12-16850 -168660 12-16866 1535-16936 
14-17033 15-17130 15-17146 16-17222 22-17604 
24-18061 27-16574 27-18560 27-16567  49-20267 
$2-20879 
64 -21668 
23-17697 24-18022 26-18242 27-186495 49-20270 
#16-17397 
o7-1149 


ee eee 


uaer wz iF cuit an 


SEQ 0467 
10-16606 10- 
13-16954 14-170186 
22-17815 22-17624 
- 2056 S2-20561 


aAPTOT CREATED BY 


SYMBOL CROSS REFERENCE 


syvremu ss VALUE 
P s esessee 
JSI 2 eeecese 
JSRA 2 eeeses 
KDPARO * 172360 
KDPARI © 172362 
KDPAR2 = 172364 
KDPARS = 172366 
KDPARG «= 172370 
KDPARS = 1723572 
KDPARG = 1723574 
KDPART = 172376 
SDPORO © 1723520 
<DPORI1 © 172322 
MDPOR2 = 172324 
| DPORS = 172326 
| PORE = 17235350 
<DPORS = 
KDPORG = 172334 
KDPORT = 172336 
KIPARO = 172340 
KIPARL = 172342 
| KIPAR2 = 
_ KIPARS = 172346 
| KIPARG © 172550 
KIPARS = 172352 
| KIPARG = 172354 
KIPART = 172356 
KIPDRO = 172300 
| KIPOR1 = 172302 
KIPOR2 = 172304 
KIPORS = 172306 
| KIPOR4 = 172310 
| KIPORS «= 172312 
| KIPORG = 172314 
KIPDORT = 172316 
KMCR = 177734 
LASTCH 113424 
LCD = eeeees 
L 076532 
LCF = eeceee 
LCF SUB 076130 
Loc Ss seeesee 
Loc2 s 666466 
LOOM2 = seeee6 
LOOMS = seeee6 


MACRO ON 18-OCT-84 AT 16:44 


C5 


PAGE 17 


CREF  v02 


7-3714 
26-18268 *26-16290 27-186539 27-18541 


o7 -9968 


©27-186543 027-16572 °27-16576 
e7-9679 07-9895 o7-9911 7-9920 
©21-17732 ©23-17896 *24-18026 

©24-18077 °26-186243 27-16510 °49-20271 


07-9969 ©12-16843 °12-16847 ¢12-16854 

e27-18537 

07-9973 ©24-16034 024-18036 *52-20621 
7-15521 7-15527 7-15533 7-15539 
7-15334 7-15340 7-15346 7-153S2 
7-15386 7-15394 7-15400 7-15406 


7-15442 07-15465 


07-9938 07-9970 @7-10177 
24-186042 2024-18044 0624-18052 
49-20296 *52-20620 5686-21200 


#26-16267 *26-16291 +¢27-186538 


7-15551 7-15557 7-15563 
7-15364 7-15370 7-15376 
7-15418 7-15424 7-15430 


Ce a eee 


DS 


aPToT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 16 

SYMBOL CROSS REFERENCE CREF vo2 

SYMBOL VALUE REFERENCES 

LOOMG 6 = ~eeesee 7-12325 

LOOMS © eeesee 7-12368 

LDOMS6 40 = eeeeee 7- 

LOOM? = eeesees 7-12438 

LOM27 © eeeese 7-124675 

LOPARS 13¥4252 $9-21 59-21304 359-21306 59-21306 5$9-21510 

LOPORS 134302 $9-21314  3$9-21316 59-21316 59-21320 59-2i1522 

LEDS 48-201 48 - 202 

LF * 000012 -442 64-2 64 -21668 

LKS = 177546 07-957 33-19137 ©33-19146 3353-19152 3535-19155 
34-19236 S-1 034 -19241 -19242 34-19245 
o37-19473 37-1 37-1 0386-19555 +«36-19570 

LKSFL 002722 67- e33-19147 33-1 034-19219 34-19227 
036-1 3536-19409 36-19416 0357-19474 37-19477 

LKSINT 134376 33-19148 34-19220 M-1 3537-19471 38-1 

LOOP 00s 7-1159 7-1190 @7-1192 64-2 

LOOPIN 003154 @7-1018 @10-16604 10-16610 10-16617 °©10-16629 

LOST 052320 7-10734 -1073% 7-10738 7-10740 07-10745 

iw 003016 07-990 024-18021 24-18030 24-18046 2246-18065 

LSTADD 111502 026-186296 026-16301  26-163537 0626-16595 ¢27-18557 

LSi = seeses 7-146966 

.S2 = eesece 7-15026 

iss s eesses 7-15066 

.s4 = eesece 7-15106 

Ls5s = eesces 7-15148 

Li6 = eeeses 7-15190 

LS7 = eeseese 7-15230 

LP s eseeee 7-15624 

LxPSUB 100014 7-15639 7-15647 7-15655 7-15663 7-15671 
7-15715 7-15724 7-15732 7-15740 7-15749 
7-15 @7-15615 

mACCC 016176 @7-4168 

MACE 051 7-10513 7-10516 7-10519 7-10522 #7-10531 

MACO 051172 7-1 @7-10511 

FACOA 051176 @7-10512 7-10526 7-10530 

MAC1 1206 @7-10514 

MAC! 051222 @7-10517 

MACS 051236 @7-10520 

Maca 1252 @7-105235 

RACS 051266 @7-10527 

MADCC 016122 07-4137 

MAIREG = 177750 @7- 39-19605 39-19608 39-19611 62-21423 

MALCC 016750 

MARCC 017030 

MARKIT = sesses 

MASK 3 

MALI 010774 

MASS 011700 

3611 011072 

BB22 11354 

mBCCC 015644 

BCOO 010576 


59-21312 
39-21324 


062-21415 
024 - 18025 


#27 -18560 


7-15679 
7-15758 


060-21347 
€61-21377 


34-19222 
35-19332 
34-19259 
3686-19559 
#24 - 18086 


27-18591 


7-15688 
7-15766 


SEQ 0469 
3534-19223 *34-19235 
3536-19426 +*36-19429 
3534-19263 34-19266 
38-21204 *62-21415 
7-15697 7-15706 
7-15775 7-15783 





CREATED BY 


SYMBOL VALUE 
mpcil 011152 
011442 
' MBIOO 010516 
MBPTO 30574 
mBscc 015716 
MBT 032704 
BTA 032726 
STB 032730 
mBTCC 015574 
BTO 032740 
mBTeE 051636 
MBTF 032750 
Beto 032762 
1B 033012 
BTOB 033014 
eBToc 033026 
MBTOD 033052 
MBTOE 033054 
MBTOF 033066 
mBT1 051120 
rete 1122 
PBTOA 051134 
BIS 051344 
MBTSA 0513574 
FBTas 051416 
BTec 051440 
MBTaD 051462 
MBT8E 051506 
Ter 051532 
MB TOFG 
mBTseI 051572 
B66 011754 
MEAS 011620 
MCLRAD 074276 
MCLRI 074354 
MCHPO 064210 
mCTSCC 016046 
MDAO 010372 
mpccc 015764 
MDDSUB 
MDF SUB 071374 
MDIVD 065642 
MDIVF 064510 
MDMO 010346 
MDM27 010456 
DSO 010422 
D1 s 666666 
me s 66666 
D3 Ss s6ee66 
POS s 66666 


77-7511 
07-7507 


07-7511 
@7-10620 
07-7515 


07-7533 
07-7537 


7-14456 
7-14540 
7-14233 
7-14315 


MACRO ON 16-OCT-84 AT 16:44 


7-10550 
@7-10560 
@7-10567 
07-10574 
@7-10562 
@7-10590 


7-14467 
7-143549 
7-14242 
7-14324 


ee + 


PAGE 19 


CREF  v02 


@7-10553 


7-14476 
7-14559 
7-14251 
7-14333 


ES 


eee ee ee + + ee + 


SEQ 0470 


7-14485 7-14494 7-14503 7-14512 7-14521 

7-14569 #7-14594 

7-14260 7-14270 7-14279 7-14288 7-14297 
@7-14358 





a a 


- —————- - 


FS 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 20 
SYMBOL CROSS REFERENCE CREF v02 
SYMBOL VALUE REFERENCES 
 6DS = eecese 7-1265 
MOF. s eesece 7-1296 
MENK 120750 49-20312 #49-20321 
121000 49-20318 #49-20322 
MENTO 030400 07-6964 
MET 032422 07-7426 
META 032460 07-7435 77-7444 
veETs 032470 7-7431 @7-7440 
METD 032500 7-7441 07-7444 
METF 032510 7-7445 07-7448 
METO 032530 07-7455 
METOA 032574 07-7466 
weTOS 032604 7-7460 07-7471 
METOC 032616 7-7472 07-7475 
METOD 032642 @7-7480 
METOE 032652 7-7476 07-7485 
METOF 032664 77-7486 @7-7489 
ME100 = eeeees 77-4729 
ME101 = seeees 7-4742 
ME102 «= ~eeeees 7-4754 
HEL03 = seeses 7-4766 
E106 08 06= sees 77-4778 
E105 = seeese 7-4790 
E106 == ~seeees 7-4802 
ME107 = = ~eesese 7-4814 
"E110 == seeees 77-4826 
ME111 = seseee 7-4838 
ME112 = seeees 7-4850 
ME113 = eeeess 7-4917 
ME113SA = sesses 7-4963 
E114 8 = seeese 7-5059 
E115 = seeeese 7-5376 
116 = seeees 7-5457 
ME117 = seeees 77-5557 
E120 = eseses 7-5601 
E12, = seeees 7-5648 
122 s eesee6 7-5740 
E123 = eesees 7-5618 
ME124 08 == eeeees 7-58685 
E125 = eeeees 77-5957 
ME1260 «= ~eeeees 77-6123 
E127 = e66ee6 7-6388 
E130 = eeeeee 77-6554 
& @7-10642 
MF ACU 051636 @7-10634 
FF SRCM 150 @7-12215 
MIALL 033300 07-7614 
MIALLA 033324 @7-7622 7-7626 
MIALLB 033326 7-7619 07-7624 
MIALLD 033336 7-7625 07-7626 


| 


MIALLF 033346 7-7629 67-7632 


ae =e ae ee 


SEQ 0471 





nc ee + ee SS ee eee eee or oro - row” 


G5 


1 
MIR77 014722 17-3747 7-3756 67-3773 


APTOT CREATED BY MACRO ON 18-OCT-84 AT 16:44 PAGE 21 
SEQ 0472 
| SYMBOL CROSS REFERENCE CREF v02 

SYMBOL VALUE REFERENCES 

MILA 033124 07-7564 77-7570 

MILAO 030672 07-7037 

MILS 033126 7-7561 07-7566 

MILO 033136 77-7567 @7-7570 

MILF 033 7-7571 07-7574 
| MILLBO 030772 07-7063 
| MILLO 030204 07-6914 
| MILLOA 030250 7-6920 07-6925 

MILLOB 030256 77-6922 07-6928 

MILO 033160 07-7579 

MILOA 033212 07-7569 

MILOB 033214 17-7584 07-7591 

MILOC 033226 77-7592 07-7595 

MILOD 033252 @7-7600 

MILOE 033254 17-7596 @7-7602 

033266 77-7603 @7-7606 

MIOT 032226 07-7371 

MIOTA 032250 07-7378 77-7384 

MIOTS 032252 17-7376 07-7380 

MIOTD 032262 77-7361 07-7384 

032272 7-7385 07-7388 

MIOTO 030302 @7-6939 

MITO 032304 07-7393 

MITOA 032334 #7-7402 

MITOB 032336 77-7396 07-7404 

MITOC 032350 7-7405 @7-7408 

HITOD 032374 07-7413 

MITOE 032376 17-7409 07-7415 

MITOF 032410 17-7416 07-7419 

MJ 012704 07-3403 

MP 013536 @7-3515 

MP 17 01 @7-3521 

MP2T7T 013570 @7-3531 

MJIP2TA 013602 7-3532 €7-3535 

P37 013654 17-3536 07-3553 

AIPSTA 0 77-3554 07-3557 

MJP67 013612 @7-3537 7-3556 

MIP6TA 013624 7- 07-3541 

AP67B 013640 7-3543 07-3547 

AP77 013642 7-3547 07-3549 

AIPTTE 013676 7-3550 07-3561 

MURA 014454 07-3715 

MJIR27 014510 07-3725 7-373 

MUR2TA 14544 7-3 @7-3735 

AUR27B 014564 07-3739 17-3764 

AIR37 014646 7-3 07-3758 

MURS7A 014702 7-3765 07-3768 

MUR6A 014642 67-3755 7-3779 

MUREB 014644 17-3754 07-3756 
7 014566 67-3741 7-3771 
| MUR67A 014622 7-3746 67-375 
| 





aPTOT 


SYMBOL CROSS REFERENCE 


MURT7A 


~ 


MUSIA 
| MJSIB 


eee 


_— 


apices 


MUSIC 


es” 


moREGESEETacouueer UOOPPOQNAOPTOONEGD 


CREATED BY 


MACRO ON 16-OCT-64 AT 16:44 


07-3783 


17-3646 
17-3686 


7-3613 


7-3653 


7-3705 


17-3693 


07-3697 


17-3426 


7-3453 


7-3432 


PAGE 22 


CREF 


voe 


H5 


ew ee ee ee Ce COC 


SEQ 0473 





ee 


I5 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 23 
SEQ 0474 
SYMBOL CROSS REFERENCE CREF v02 
SYMBOL VALUE REFERENCES 
i S) 013134 7-3440 77-3462 07-3465 
MJ7 013164 7-3472 07-3474 
mLCD 076242 @7-15511 
mLCF 075424 @7-15324 
mLDC 063642 @7-13222 
ML_OC2 075324 @7-15261 
MLDOM2 @7-12250 
MLDOMS 060306 @7-12269 
MLOUIMG @7-12 
MLOOMS 060526 @7-12377 
M_DOMG 060616 #7-12414 
MLDOM7 @7-12447 
MLOM27 060770 @7-12484 
MLDSUB 070376 ae oe ghtaaat 7-14067 7-14075 7-14063 7-14091 7-14099 7-14107 7-14116 
MLFSUB 067400 7-13837 7-13845 7-138653 7-13861 7-13869 7-13877 7-13885 7-13893 7-13901 
7-13909 7-13917 7-13925 7-13934 7-13943 7-13952 #7-13974 
MmS1 074410 @7-14995 
mS2 074502 #7-15035 
mss 074574 #7-15075 
mSs4 074704 #7-15117 
MLSS 075000 @7-15157 
MLS6 075110 #7-15199 
MLS7 075210 @7-15239 
1 Bd @7-15634 
MMARK 017534 07-4673 
h000 071650 7-184 Ba 
MMODF 070610 @7-14219 
PRLS 012436 @7-3230 
(FRO = 177572 07-969 049-20274 249-20305 *52-20622 *52-20651 
PR = 177574 7-970 
MAR * 177576 @7-971 
ARS * 172516 @7-972 024-18024 224-16092 »%27-16497 227-16531 *49-20275 +49-20306 
MMTS10 = seeses 7-9505 
MMTS11 = sesese 77-9589 
MMTS12 = sesese 7-9640 
MAITS13 = sesees 7-9719 
MANTS14 = sesesse 7-9951 
MNITS15 = sesess 7-10202 
| MMTS16 = seeses 7-10301 
MAMTSGA = sesese T- 
MMTS6B = seseses 7-8766 
MANTS6C = sesesse 7-8915 
MMTS6ED = seeses 7- 
hNU 135066 71-8694 7-679 7-8925 7-9039 7-9153 7-9171 77-9260 7-9302 7-9513 
7-9525 7-953%6 7-9550 7-9614 7-9646 7-9733 77-9982 7-10176 7-10207 
| 7-10307 #62-21542 
MMULD 067612 @7-14046 
MMULF 066604 @7-138632 
MMUTRP 135240 7-1155 062 -21588 
MMUTST = sesees 7-8060 62-21535 
MMUTSO = seeses 7-3619 
| 


J5 


| APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 24 
SEQ 0475 
| SYMBOL CROSS REFERENCE CREF v02 
| SYMBOL VALUE REFERENCES 
MMUTSL = eeeese 7-8087 
| MMUTS2 © eeeses 7-8107 
MUTSS = seeeee 7-8363 
MUTS4 = eenese 7-8438 
M@UTSS = seeees 7-8626 
MUTSE = seeeee 7-8659 
MMUTS7T = eeeese 7-9143 
MMUTSS = eeeece 7-9250 
MUTS9 = seeses 7-9293 
retvcc 015530 07-3952 
revec = 5-441 
retii 01 @7-2674 
ret22 011232 @7-2622 
MNCCCC 016260 @7-4202 
MNGOP 062106 @7-12615 
MNNREL 061062 @7-12522 
MARRS 1302 @7-12599 
las arial! 061434 #7-12651 
HORM 061556 #7-12700 
HREM 062740 #7-13012 
mODD = eseses 7-14435 
MODE 1 046014 7-9742 @7-98629 
MODE? 047374 7-10006 #7-10118 
mOOF s sesees 7-14210 
RODGAR 071640 7-14363 #7-14431 7-14599 
MRLB1 012164 #7-3121 
MRLCC 016532 @7-4313 
MRLO 012112 07-3094 
MARL2 0 #7-3151 
MALS 012 #7-3161 
ARL4 012376 #7-3208 
MRLS = sesees 7-3229 
ARLE 012500 @7-3252 
MRL7 012536 @7-3272 
ARRB1 012656 07-3384 
MRRCC 016612 07-4348 
MRRO 012634 07-3368 
MRT 031504 @7-7212 
ARTA 031526 @7-7219 17-7225 
ARTB 031530 7-7217 @7-7221 
ARTE 031540 7-7 @7-7225 
ARIF 031550 7-7, @7-7229 
MRTO 031562 @7-7237 
ARTOA 031612 07-7246 
ARTOB 031614 17-7242 07-7248 
MRTOC 03 7-7249 @7-7252 
MRTOD 031652 07-7258 
MRTOE 031654 7-7253 #7-7260 
MRTOF 031666 7-7261 @7-7264 
MRTS 014762 @7-3790 
SB 062616 @7-12963 
mSBCC 016376 @7-4251 





MSFD 
MSFOI 


HH 


CERRO EE EE EARLE ELLE: 


KS 


CREATED BY MACRO ON 18-OCT-84 AT 16:44 PAGE 25 


073310 
074242 
017460 
007624 


@7-3350 


CREF v02 


7-16268 7-16291 9-16499 9-16557 11-16764 
15-17139 15-17151 ©16-17217 16-17227 +417-17307 
19-17455 19-17461 %*20-17579 -17584 *20-17596 
20-17632 #20-17636  20-17642 *20-17647 49-20390 
#51-20502 *51-20509 5686-21192 5686-21196 56-21197 


@7-7103 
@7-7106 


#15-17119 


15-17120 
17-17318 


SEQ 0476 


15-17135 


#50-20448 
62-21410 


eee Eee 


—_ ee 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 26 
SYMBOL CROSS REFERENCE CREF v02 
SYMBOL VALUE REFERENCES 
mSxXP 101432 #7-16145 
017262 @7 -4564 
Tcc 017120 07-4489 
Sil 011032 @7-2739 
13 @7-28651 
S33 011534 @7-2956 
"S77 012024 @7-3068 
mTeP 031700 @7-7270 
HTPA 032102 @7-7331 
MTPAA 032156 7-7339 ~- 17-7340 77-7346 67-7351 
MTPAE 032206 77-7356 07-7360 
ATPAH 032154 7-7338 07-7348 
MTPAL 032144 07-7342 07-7357 07-7358 7-7359 
TPB 031732 77-7275 @7-7281 
ATC 031752 77-7266 @7-7289 
MTPO 031764 07-7297 
HTPOA 032014 07-7306 
MTPOB 032016 77-7302 @7-7308 
MTPOC 032030 77-7309 07-7312 
MTPOD 032054 @7-7317 
MTPOE 032056 7-7313 07-7319 
MTPOF 032070 7-7320 @7-7323 
HMTPQ 031742 77-7262 @7-7265 
HMTPR 031730 @7-7279 77-7265 
MTRPO 030476 @7-6967 
MTRY 027720 07-6841 
MTRYA 027774 7-6848 07-6857 
MTRYB 030014 77-6861 07-6865 
MTRYM 030046 67-6877 
TSO 015530 T- 07-3949 
MTT 031156 @7-7113 
MTTA 031212 7-7119 @7-7124 7-7130 
“TTB 031214 7-7120 @7-7126 
MTTO 031224 7-7127 @7-7130 
MTTE 031234 7-7131 @7-7134 
MTTR 031340 @7-7171 
MTTRA 031404 77-7177 07-7184 
MTTRB 031406 77-7178 07-7186 
MTTRC 031420 77-7187 @7-7190 
MTTRD 031456 7-7192 @7-7199 
MTTRE 031460 7-7193 @7-7201 
MTTRE 031472 7- @7-7205 
MTTS 031246 @7-7142 
MTTSA 031302 7-7146 @7-7153 
MTTSB 031306 7-7149 07-7157 
MTTSO 031316 7-7158 @7-7161 
MTTSE 031 7-7162 @7-7165 
mTTS@ 031304 @7-7155 7-7161 
| MULD Ss eeese6 7-14037 
| MULF s seeese 7-138623 
MUVAD 063050 @7-13055 


| MVYCC Ss 66666 7-3951 


any = OC) a cat 


SEQ 0477 


CREATED BY MACRO ON 16-OCT-84 AT 16:44 


SYMBOL VALUE 
MXOF 1 061666 
MxOR 017400 
MXRCC 017170 
Mil = eeeese 
M2 004752 
M22 s eseese 
Lak} 004766 
| 005006 
oS 005026 
M6 005046 
wcccc s eeeeee 
WF &LAOD 003026 
NEWDAT 111474 
NGOP s seseee 
WRAL = eseese 
Werte s eeeses 
wMRMS == seseese 
Noa s eseses 
NOABRT 136464 
WOTOK 135316 
RRA Ss seeees 
WALL s 
eoor IN 047616 
RXNP AR 106670 
MRXMTRP 047224 
NXMTST = sesese 
GODADR = seesee 
ODOXx 033600 
OK 135274 
OKAY? 043036 
OKAY7A 043046 
OKA7 043024 
Oxi 155322 
OK7 045005 
GeNa22 134630 
PRR 135210 
PAP ADL OSEE44 
PREAD? 047256 
PARVAL 045676 
PRAVWAS 047310 
PERVAS 047426 
PARI 135212 
PCR = 177522 
| POR 135 
PORL 135170 
PHY 045762 
PIR = 177772 
PIRQ * 177772 


26-16327 
27-18593 


17-7799 


7-7912 


26 - 18334 
27 -18597 


064 - 21666 


44-19661 
@7-10196 


62-21551 


@7-10151 


07-7618 
e7-7913 


PAGE 27 


CREF  vO02 


26 -186345 
#27 - 18602 


45-19976 


62-21552 


7-78619 
07-7934 


26- 18347 
#27 - 18605 


47-20152 


62-21554 62-21555 


26-18679 *26-16686 
#30-16866  30-13686 


32-19050 +32-19058 
7-7623 7-7624 
o7-7940 o7-7944 


#62 -21573 


26 - 18689 
#30 - 18890 
32-19059 


07-7859 
07-7947 


SEQ 0476 


#26-186353 *26-18355 26-16392 +*27-16552 


#26 - 16701 
#30- 18900 
$8 -21202 


26-18691 
230-188691 
#32-19070 


7-7865 
e7-7978 


07-7863 
o7-7969 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 


SYMBOL VALUE REFERENCES 
7-7961 7-7998 
PIRQNX 034202 7- 7 67-7803 
PIRQT 123252 54-20606 054-206 
PIRQVE = 000240 05 -442 7-7808 
e7-7970 07-7971 
PIRRTN 034502 7-78697 @7-7912 
PIRTBL 034304 7-7615 07-7834 
PIRTEX 034204 7-7801 @7-7804 
PIRTST = seeees 7-7792 
PIRXXX 034146 07-7794 
PIR1 024204 07-7806 
PIR2 034324 @7-7855 
PIRZEX 32 7-7869 07-7884 
PIRS 034432 07-7893 
PIRSEX 034526 7-7910 @7-7920 
FIS8 034526 07-7931 
PIRS @7- 
PIRSEX 035014 7-7993 @7-8027 
PIRG 035014 07-8044 
PIRGEX 035116 7- 07-8074 
PITBL1 034410 77-7862 07-7879 
PITBL2 r) 77-7972 @7-8020 
PIi 034454 @7-7900 7-7909 
PI2 @7-7906 7-7916 
PI3 034470 @7-7907 77-7917 
PLFO 043654 7-9303 @7-9380 
PLF1 7-9314 7-9325 
POLY a 1 @7-973 
PROCNT 023106 @7-5622 7-5635 
PRO = 000000 5-442 
PRL = 000040 5-442 
PRO = 000100 05-442 
PRS = 000140 #5 -442 
PR4 = 000200 5-442 
PRS = 000240 5-442 
PRE = 000300 85-442 
PR7 = 000340 05-442 7-7611 
PS = 177776 5-442 5-442 
! e7-5372 27-5619 
| 07-7399 07-7410 
67-7657 07-7679 
| PS = 177776 5-442 07-7769 
PSWBTS 0055765 @7-1492 
PWRVEC = 000024 07-1149 
064-21674 264-21674 
Q22EN 003002 07-948 §3-20727 
Q22INT 134664 53-20738 53-20767 
Q@22SIZ 134404 7-1191 062 -21423 
RiXPAR 134326 7-1153 @62 -21403 
RBUF * 177562 @7-962 42-19751 
47-20136 47-20155 
RCSR * 177560 07-963 40-19657 


7-7999 


7-7809 
07-8049 


O7-B8RG 


7-7971 
e7-5139 
07-7179 
07-7463 
07-7738 
07-7935 


o7-1149 
#64 -21674 
53-20756 
54 -20615 
42-19764 
ag- 
42-19747 


PAGE 26 


CREF v02 


7 -8047 


#7-7810 
27-8050 


7-8050 
7-5140 
07-7194 
07-7477 
7-7739 


55-20656 
64-21674 
54 -20607 
56-20911 


42-19757 


NS 


#7-8052 


#7-7611 
#7-8074 


#7-5151 
#7-7243 
27-7528 
7-7743 
#55-20657 
56 -20902 
56-20915 
45-19956 
42-19760 


7-8062 


07-7897 
#7-8075 


7-5152 
07-7254 
#7-7539 

77-7747 


#55 -208658 


62 -21485 


45-19992 
42-19770 


SEQ 0479 


#7-8071 0554-20614 2*54-20629 


07-7896 #7-7936 07-7939 
054-20605 +*54-20606 


#7-5180 #7-5187 07-5194 
07-7276 *#7-7303 07-7314 
07-7585 #7-7597 07-7645 
07-7976 7-7980 #7-10182 


#55-20667 *64-21674 %64-21674 


46-20056  46-20062 46-20085 
#44-19843 44-19844 44-19651 





ae le 


B6 


apTot CREATED BY MACRO ON 16-OCT-64 AT 16:44 PAGE 29 
SYMBOL CROSS REFERENCE CREF vO02 
SYMBOL VALUE REFERENCES 


044-19662 2044-19901 44-19903 45-19955 2045-19979 45-19996 46-20053 46-20060 46-20061 


* 104410 64-21671 064-21675 

ROLIN = 106411 64-21672 064-21673 

RDOCT * 104412 064 -216738 

RECDAT 111464 e9- 9-16545 9- 9-16550 10- ©10-16645 ©11-16754 11-16755 ¢11-16760 
1131-16761 ©11-16770 11-16771 ©12-168650 12- e12- 12-16861 ¢12- - 
0135-16938 - @135- 13- @14-17018  14-17019 ©14-170235 1464-17024 «14-17026 
14-17029 ©14-17033 14-17034 ©15-17146 15-17147 ©16-17222 16-17223 22-1 22-17805 
22-1 022-17615 22-176 22-17619 e22-17624 22-17625 22-17629 25-17916 23-17921 
023-17941 23-1 024 - 1806 - 026-16269 ©26-16325 26-18324 %*26- 26- 

- €26-16388 ¢27-16574  27-16575 °«27-16560 27-18561 27-16563 27-18567  27-18566 

049-20267  49-20269 +52-20561 - 0352-20561 %S2-20563 *52-20605 S2- 052 - 20638 

$2-20640 e52-20679 S$2-20661 538-21194 5356-21199 

| RECDST 003142 @7-1014 7-12253 7-12292 7-12314 7-12337 7-12380 7-12617 7-12450 7-12487 
e7- e7-12527 7-12537 7-12602 7-126%4 7-12707 7-12748 7-12622 7-12644 
7-12674 7-12901 7-12919 T- 7 7-12969 7-13023 7-130%6 7-13065 7-13069 
7-13116 7-13140 7-13167 7-13191 7-13232 7-13256 7-13288 7-13306 7-13391 
7-1 7-13797 7-1401) 7-16 7-14397 7-14633 7-14731 7-148637 7-14939 
7-15303 7-15467 7-1 7-158617 7-16027 7-16201 7-16219 

RECFEC 003122 07-1012 7-12220 7-14884 7-158735 7-16061 

RECST 003132 @7-10135 7-15000 7-15006 7-15012 7-15040 7-150468 7-15052 7-15062 7-15094 
7-15122 7-15130 7-15134 7-15164 7-15176 

RPEDZON = seeses 77-7761 

RESVEC = 000010 05-442 

RET1 015246 07-3672 7-3904 7-3919 7-3942 

RETO 01 07-3894 7-3924 7-3937 

RETS 015412 07-3914 7-3932 

RITEDA 111472 026-16293 26-16330 26-16332 26-163539 °26-18344 226-18349 *26-18350 26-186353 26-183555 
€26-16391 ¢27-16553 °27-16596 27-16597 °27-16601 *27-18604 27-18605 

RLB1 es eeese6 7-3120 

RLCC s eeccee 7-4312 

RLO s seeeee 7-3093 

RL2 s eecece 7-3150 

as s eeeces 7-3180 

aQL4a s eeeces 77-3207 

RL6 s escese 77-3251 

AaL7 = eesses 7-3271 

ROM Ss seesee 7-3483 

eB 1 s eesese 7-3363 

RRCC s eeceee 7-4347 

RAO = seseee 7-3367 

RT s eseees 7-7211 

RTO s eeesese 77-72% 

RTs 2 eseses 7-3789 

RTSE 015034 7-3613 07-3616 

RTS1 015002 7-3795 07-3799 

RTS6 015012 7-3800 07-3806 

RXXX 034020 07-7762 

Rey 26000006 5-442 o7-1149 07-1149 7-1149 o7-1467 7-1468 e7-1472 -1473 @7-1477 


7 
7-1476 o7-14862 7-1483 o7-1487 7-3569 7-3570 77-3582 7-3584 e7-3591 
7-3662 7- 3604 o7-3611 7-3621 7-3623 o7-3630 7-3642 7-3644 e7-3651 


C6 


APTOT CREATED BY MACRO ON 16-OCT-64 AT 16:44 PAGE 30 
SEQ 04861 

SYMBOL CROSS REFERENCE CREF vOo2 
SYMBOL VALUE REFERENCES 

7- 7- o7-3671 17-3662 7- 3684 07-3691 7-3701 77-3703 e7-3710 

7-3719 7-3720 17-3727 77-3729 o7-3737 77-3743 17-3745 e7-3752 - 

77-3762 07-3769 77-3775 77-3777 o7-3765 o7-37935 07-3794 7-3806 07-3806 

07-3809 7-3812 o7-3816 07-3623 17-3624 o7-3626 77-3629 7-36335 77-3634 

o7-3638 77-3639 07-3045 07-3645 7 - 3846 e7-3650 77-3631 e7- 7-38%6 


07-5996 7 07-6011 e7-6127 e7-6133 07-6134 07-6139 7-6) 44 ©7-6146 
e7-6151 07-6796 07-6799 0? 6Ac4a e7? e7 e7-6611 
e7-6812 7-6813 07-6617 o7-6618 07-6619 717-6820 07-6828 07-6825 7- 

07-6830 07-6631 7 07-845 07-6853 07-6654 71-6450 e7-6671 


e7-7550 e7-7559 7-7566 77-7570 e7-7575 e7- e7- e7-7606 7-7617 
17-7624 77-7626 e7-7633 o7-7642 o7-7655 07-7668 07-7767 7-8689 7- 
7-8709 7-8714 77-8792 7-6794 77-6611 7-8816 7-892 77-6923 7-6941 


1 
7 -8946 77-9035 77-9037 77-9055 7-9060 07-9947 #7-10333 ¢7-10335 7-10376 


R7 #8000007 @5 -£42 e7-2079 77-3519 77-9207 77-9267 17-9339 7-9519 7-930 7-941 

17-9534 77-9637 17-9664 77-9671 7-9676 77-9665 7-9692 7-10410 ¢7-10549 
7-10556 *7-10565 °*7-10570 °7-10576 *7-10586 ¢7-10615 7-12221 4097-12270 = #7 - 12315 
7-12356 67-12997 *7-12430 °67-12467 ¢7-12506 8 °e7- e7-12554 ¢7-12567 ¢7-12561 
©7-12618 ¢7-12633 ©7-12667 ¢7-12662 ¢7-12712 ¢7-12724 *7-12759 *7-12769 *7-12785 
e7-12794 ¢7-12629 °7-12657 °¢7-12667 *7-12906 *7-12926 ¢7- e7-12979 *7-12994 
©7-13026 07-13038 4 07-13072 9007-13102 9= 7-13125 §9= e7-151535 9 67-13174 8 67-13204 3867-15259 
©7-13263 ¢7-13295 °©7-13315 ©7-13336 ¢7-13345 ¢7-13352 7-1 e7-13402 = e7-13427 


e7-13670 e7-13679 ¢7-13688 °07-13696 ¢7-137064 ¢e7-13712 ¢7-13720 ¢7-13726 °7-13737 
e7-13805 ¢7-13837 07-13645 e7-13653 07-13661 °7-13869 °7-13677 °7-13865 °7-158695 
o7-13901 ¢7-13909 ¢7-13917 ¢7-13925 27-13934 7-139435 °07-13952 °7-14019 ¢7-14051 
07-14059 ¢7-14067 ¢7-14075 ¢7-14063 ¢7-14091 ¢7-14099 7-14107 *7-14116 *7-14124 
©7-14192  ¢7-14224 07-14233 ¢7-14242 ¢7-14251  ¢7-14260 °7-14270 ¢7-14279 %7-14266 
07-14297 ©7-14306 07-14315  ¢7-14324 07-14333 7-14406 ¢7-14415 %7-14449 ¢7-14456 
o7-14467 o7-14476 o7-14485 07-14494 07-14503 e7-14512 e7-14521 e7-14530 e7-14540 
o7-14549 o7-14559 07-14569 07-14642 07-14651 o7-14682 07-14688 o7-14694 @7-14700 
©7-14706 07-14747 07-14775 07-14762 *7-14789 ¢7-14796 ¢7-14803 ¢7-14810 °*7-14875 


67-15655 ¢7-15663 ¢7-15671 °7-15679  ¢7-15688 ¢7-15697 *7-15706 ¢7-15715 ¢7-15724 
67-15732 07-15740 ¢7-15749 ¢7-15756 ¢7-15766 ¢7-15775 +7-15763 ¢7-15792 +*7-15864 


aPTOoT 


SYMBOL CROSS REFERENCE 


SYMBOL VALUE 


002730 


003040 
004112 
004114 
eeccee 
eecece 
eecces 
orecee 


101054 


OP as 


SCDSUB 
SCF = eseses 
SCOPE 000004 


SSSoae 


SOF SUB 074040 
SOPARO = 172260 
SOPAR1 © 172262 
SOPAR2 = 172264 
SOPARS = 172266 
* 172270 

SOPARS © 172272 
SOPARG = 172274 
SOPART © 172276 
SOPDRO = 172220 
SOPOR1 = 172222 
| SOPOR2 © 172224 
| SOPORS = 172226 
| SOPOR4 = 1722350 
| SOPORS = 172232 


CREATED BY 


MACRO ON 16-OCT-64 AT 16:44 


e7-1148 


7-147869 


PAGE 31 

CREF vo2 

e7-15919 ¢7-15926 
e7-15962 ¢7-15969 
e7-16149  %7-16155 
30-16837 230-186902 
3536-19430 2037-19469 
$7-21051 

e7-9213 7-9214 
o7-9353 7-9354 
7-9218 67-9227 
77-9574 07-9563 
77-9222 07-9226 
07-9584 7-9709 
07-8794 7-8816 
33-19126 

07-8792 7-6611 
64-21666 64-21666 
64 - 21666 

-15919 7-15926 
-1 7-15969 

6- 9- 
16-17207 17-17276 
25-18109 26-162 
34-19210 35-19307 
43-19790 44-1 
$1- $2-20535 
7-14796 7-14803 


e7-16161 


o31-16923 
0386-19543 


07-9226 


07-9367 


07-9714 


7-8923 
e7-6921 


$3- 20716 


7-14810 


e7-15940 
¢7-16003 
©7-16167 


31-16949 
3686-19563 


9262 
7-10416 


7-8946 
77-6941 


7-15940 
7-16003 


10-16597 
19-17430 
8668 


#7-14832 


e7-15947 
e7-16072 
e7-16173 


@32-19022 
046 - 20046 


7-15947 
@7-16025 


ii- 16739 


SEQ 0482 


07-15954 
@7-16106 
#7-16179 


32-19077 
46-20077 





= COO -C._O,Nov—XOOl_OC 


E6 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 32 
SEQ 04863 
YMBOL CROSS REFERENCE CREF vO02 
SYMBOL VALUE REFERENCES 
SDPOR6 = 172234 05-441 
SOPOR7T = 1722% @5-441 
SEQ 003072 @7-1006 07-3406 7-3409 o7-3417 7-3421 07-3425 7-3426 07-3436 7-3444 


07-3446 7-3457 o7-3461 7-3467 07-3471 7-3476 7-3518 77-3521 e7-3525 
7-3531 07-3535 7-3537 o7-3541 17-3549 7-3553 7-3557 e7-3572 7-3578 
e7-3590 77-3596 e7-3610 7-3617 e7-3629 77-3636 7-3650 7-3656 7-3670 
7-3678 <-a 17-3697 o7-3716 77-3725 e7-3735 7-3741 e7-3751 77-3756 


SFD = eeecee 7-14669 

SFDI = eeceee 7-148694 

SFOSUB 073504 7-14682 7-14688 7-14694 7-14700 7-14706 07-14726 

SIMGOA 002702 07-929 57-20989 57-21046 *62-21446 %*62-21449 

SIPARO = 172240 #5 - 448) 

SIPAR1 = 172242 05-441 

SIPAR2 = 172244 5-441 

SIPARS = 172246 05-441 

SIPAR4 = 172250 5-441 

SIPARS = 172252 05-441 

SIPARG = 172254 05-441 

SIPART = 172256 #5 - 441 

SIPDRO = 172200 5-441 7-10406 

SIPOR1 = 172202 5-441 

SIPORE = 172204 05-441 

SIPORS = 172206 5-441 

SIPOR4 = 172210 5-441 

SIPORS = 172212 5-44) 

SIPOR6 = 172214 5-441 

SIPOR7T = 172216 5-441 

SIxXBIT 112774 26-18670 26-16671 26-18706 

SLEND 120134 40-19650 047-20161 

9 07-6919 

7 07-6984 7 7 -6969 7-6960 07-6992 7-7003 #7-7017 7- 
7-7042 7-7055 67-7067 7-70860 #7-7090 7-7106 #7-7117 77-7135 e7-7146 
77-7166 67-7175 7-7206 7-7216 7-7230 e7-7241 7-7265 07-7274 7-7290 
07-7301 7- 07-7336 - 07-7375 7-7 7-7397 7-7 07-7430 
7-7449 07-7459 7-7491 7-7502 7-7515 7-7526 7-7549 *7-7560 7-7574 
27-7563 17-7607 ¢7-76168 17-7632 07-7643 7-7667 e7-7677 7-7695 e7-7712 
77-7757 7-7765 - 07-7796 7-7800 07-7806 7-8074 07-9657 07 -S64 
e7-9671 07-9676 07-9665 7-9692 7-9709 07-9674 7-9948 07-9964 7-9978 


96 62 6299 6429 92 
#11-16746 11-16779 ¢15-17117 15-17155 15-17160 16-17214 16-17226 17-17264 17-17305 
#18-17372 1686-17392 ye Son 19-17473 ©20-17573 20-17649 *21-17729 21-17750 
SLOCcOL 003014 07-967 ¢7-6921 - 7-6929 ©7 -6946 7-6957 7-6971 7-6961 27-6994 7-7004 
7-7019 7-7030 67-7044 77-7054 #7-7069 77-7079 7-7337 7-7363 *7-7432 
7-7448 7-7461 7-7490 o7-7714 77-7758 7-7609 7-8075 7-9675 7-9949 
7-9965 17-9979 7-10072 ¢17-17265 17-17306 *21-17730 21-17751 


S08 = seeees 717-4643 
SOP AA Ss 666666 77-2257 
soPse Ss 666665 77-2293 
SOPD = 66666 7-1564 
SOPE s seeses 7-1609 
SOPF = 666666 7-1636 


eee 
g 
# 
e 
* 
3 
% 
$ 
* z 
z 33 
~ 
5 
3 
~ 
8 
‘ 
~ 
3 





—_— —= a — eee a ee eee eee eee oe ee ee ee eee ee ere oe eee ae a ee ees eee ee 


F6 


e7-9915 07-9924 7-9933 7-9942 07-9945 o7-9962 7-9975 #7-10069 *7-10180 
©7-10196  ¢12-168644 12-16846 %12-16655 %12-16858 12-16864 ¢12-16870 %13-16926 *15-16961 
€21-17733 21-17748 23-17899 *23-17952 24-16023 *24-16090 *26-16244 *26-16219 %27-16496 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 33 
SEQ 0484 
SYMBOL CROSS REFERENCE CREF vO02 
SYMBOL VALUE REFERENCES 
 S$0PG = eecece 7-1662 
SOPH 2 esccee 7-1687 
- SOPI = eeceee 7-1715 
| SOPY = eeeses 77-1741 
| SOPL = eecese 7-1793 
| SOPM = eecces 7-1622 
| SOPN = seesee 7-18656 
| SOPO 2 eesese 7-1665 
soPpP = eecece 7-1932 
SoPe = eeeces 7-1969 
SOPR = seceee 7-2012 
SOPS = eecese 7-2045 
SOPT s eeeese 77-2072 
SOPU = eeseee 7-2068 
soPV = eeseee 7-2140 
SOPVO = =~ eeeese 7-2116 
SOPX = seeces 7-2168 
SOPY = eeseee 7-2196 
SOPZ = seeses 77-2227 
SOP1 = seceee 7-1543 
SOP 2 = eseese 7-1563 
SPAU s eeeses 7-6794 
SPAU1 027574 7-6801 07-6804 
SPA 027616 7-6808 07-6611 
SPAUS 7-6814 07-6817 
GP Ball 7-6621 07-6824 
027676 7-6827 07-6830 
GE BIG 027714 7-6833 07-6836 
SPS 003074 @7-1007 07-3569 7-3591 7-3611 7-3630 7-3651 7-3671 7-3691 7-3710 
¢7-3719 17-3737 7-3752 17-3769 7-3785 
SPSJ 003076 @7-1006 07-3570 e7-3571 7-3562 7-3602 7-3621 7-3642 7-3662 7-3682 
7-3701 e7-3720 7-3721 7-3727 7-3743 7-3760 7-3775 
| SPT3B = seeeee 17-2323 
| SPO Ss eeseee 7-1516 
| SRO * 177572 5-441 7-969 7-5681 7-8631 7-8636 7-8645 7-8652 07-9880 07-9901 
| 
| 
| 


27 - 
SR1 * 177574 5-441 7-970 
SR2 * 177576 5 -MAL 7-971 
3 * 172516 @5-441 7-972 7-9678 7-9694 *7-9906 07-9974 

STACK = 001100 5-442 7-1149 

START 004024 5-447 5-450 07-1148 

STBOT = 001000 07-1042 77-1487 7-3793 7-3867 «7-3870 7-3883 7-4676 #7-4677 7-4694 
7-4716 77-3996 7-6009 7-6011 7-6134 7-6139 7-6146 7-6151 7-6811 
77-6617 7-6830 17-6836 77-6854 7-6871 -6886 7-6895 7-6903 7-6908 

7-6932 7-6951 77-6956 7-6976 7-6963 7-6999 7-7006 7-7024 

7-7031 7-7050 77-7057 7-70 77-7081 7-7103 7-7107 77-7116 77-7126 
7-7137 7-7145 77-7157 7-7167 7-7174 7-7186 77-7190 77-7201 7-7207 
7-7215 7-7221 77-7231 7-7240 7-7248 77-7252 7-7260 7-7266 7-7273 
7-7261 7-7291 7-7300 7-7308 77-7312 7-7319 7-7325 7-7335 7-7354 





APTOT 


_ SYMBOL CROSS REFERENCE 


SYMBOL 


* 
=~ 


GOCUREREEERRELEREEECUUCEERE ESS EE 
: GR aubeo | wie | 


— 


CREATED BY 


VALUE 


177774 
110642 
111764 
ececes 
eecese 
eeeces 
eeceee 
eeceee 
eesees 
ececes 
052126 
001140 


000400 
001000 
oseeee 


101612 
seeces 


3532-19005 
64-21665 


7-1149 
7- 


7-3331 


7-16155 


MACRO ON 16-OCT-84 AT 16:44 


7-10657 
e7-1149 


32-19011 
64 -21666 


7-1162 


7-16161 


#7-10703 


PAGE 34 

CREF vO02 
77-7389 7-739 
77-7456 7-7471 
7-7533 77-7537 
77-7595 7-7602 
17-7662 77-7668 
7-10659 7-10661 
7-1149 7-1149 
32-19020 32-19021 
64-21666 64-21666  64-21666 
64-21671  64-21671 
7-16167 7-16173 


7-16179 


7-1162 
64 -21665 
64-21671 


#7-16199 


7-7415 
7-7492 


64-21671 


26-18238 
64 -21665 
64-21674 


-_—— — ne See eee eee rrr -r—c sees 


H6 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 35 
| SEQ 0486 
| SYMBOL CROSS REFERENCE CREF v02 
SYMBOL «VALUE REFERENCES 
SXTCC = eeeeee 7-4488 
Sill 2 seeese 77-2738 
S22 = eeeeee 77-2650 
$33 = eeeese 7-2955 
S77 es eseees 7-3067 
TAB1L 003234 07-1046 7-12254 7-12264 7-12268 7-12382 7-123%6 7-12452 7-12466 7-12656 
TAB10 #7-1067 7-12749 7-12762 
TAB11 003374 @7-1091 7-12747 
TAB11A 67-1095 7-12758 
TAB12 003414 07-1096 7-12764 
TAB15 003424 @7-1097 
TAB138 003434 @7-1101 7-12767 
TABI4 003444 #7-1102 7-12775 7-12964 
TAB1S 003454 @7-1106 7-12776 
TAB16 CO3464 #7-1110 7-12788 7-13248 
TAB17 003474 @7-1114 7-12793 
TAB16 @7-1117 7-12681 
@7-1050 7- 7-12313 7-12416 7-12604 
TABO1 003514 @7-1121 7-12618 7-12635 7-128664 7-12968 
00 @7-1122 7- 
TAB23 c03534 @7-1123 7-12636 7-12863 
TAB24 005544 @7-1124 T- 7- 
TAB2]S 003554 #7-1125 7-12694 7-12914 
@7-1126 7-12693 7-12915 
TAB27 003574 @7-1127 7-12907 7-12925 
TAB2B @7-1126 7-12933 
TABS 003614 #7-1129 7-12932 
TAB29A 003624 #7-1130 7-12943 
TABS 003254 07-1054 7-12338 7-12353 7-12357 
TAB3SO 003634 67-1132 7-13018 
TAB31 CO N644 67-1133 7-13017 
TABS2 003654 07-1134 7-13031 
TABSS @7-1135 7-13032 
TR 3m 003674 07-1136 7-13025 
TAS4 003264 07-1058 7-12617 7-12632 
TARO 003704 07-1137 7-13060 7-13061 7-13080 7-13061 
TAB41 003714 07-1136 7-13112 7-13135 7-131G62 7-13163 
TEA? 003724 #7-1139 7-13165 7-13164 
TAS43 003734 @7-1140 7-13203 
TABLS 003744 07-1141 7-13226. 7-13234 7-13247 7-13251 7-13264 
THA46 003754 @7-1142 7-13236 
TAB47 003764 07-1145 7-13263 7-14935 
Té4 7m 003774 07-1144 
07-1145 7-13294 7-13304 
TRA49 004014 07-1146 7-13262 
TABS 003274 07-1062 7- 
TABSA 003304 @7-1066 7-13152 
Tse 003314 @7-1070 7-12339 7-12525 7-12603 7-12655 7-12978 7-12993 7-13071 7-13101 
7-13122 7-131735 7-13229 7-13303 7-13314 7-13399 7-14942 
TARGA 003324 07-1074 7-15302 
TAB7 003334 07-1078 7-12705 7-13111 7-13132 


TABB 003344 #7-1062 7-12706 7-12717 7-127186 





16 


aAPTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 36 
| SEQ 0487 
_ SYMBOL CROSS REFERENCE CREF v02 

SYMBOL VALUE REFERENCES 
| TABS 003354 07-1086 7-12711 

TAPABO 105034 16-17215 16-17232 

TA114 021150 7-5094 07-5099 

TA1L16 022624 7-5483 7-5492 @7-5516 77-5533 

ITVE = 000014 05-442 

T8114 021160 7-3100 @7-5103 

TC114 1170 77-3104 @7-5107 

T0114 021200 7-5106 @7-Si11 

002740 07-945 49-20352 49-20373 49-20379  49-20387 50-20430 *50-20437 *51-20494 +52-20555 
S2-20560 52-20566 52-20580 52-20590 52-20594  52-20602 +*52-20654 


- 52-20664 52-20665 
S2-20674  S2-20676 57-20961 5$7-20962 57-20994 57-21013 57-21017 57-21022 57-21039 
S7-21063 57-21048 62-21505 62-21514 


seeataaiaeniaet aaa 


TE130A 027146 7-6602 07-6639 


TE102 «017740 07-4755 

TE10S «= _«O17762 07-4767 

TE108 © 020008 07-4779 

TE10S 020026 07-4791 

TE106 020050 07-4803 

TE107 72 07-4815 

TE110 ©: 20114 @7-4827 

TE111 020136 07-4839 

TE112 020160 07-4851 

TE113 07-4918 

TE113A 07-4964 

TE114 © 020774 @7-5060 

TE11S © 022144 07-5377 

TE11SA 022354 7-5381 7-53968 7-S415 07-5441 
E1158 022364 7-5382 «77-5399 -s«7-54160=— 07-5445 
TELISC 022372 7-5383 7-500 0 07-5448 
E1150 022400 17-5417 07-5451 

TEL1SF 17-5437 07-5454 

TE116 =: 022410 07-5458 

TELIGA 022664 17-5479 17-5488 07-5536 
E1168 022670 7-5463 -7-5489 Ss: 07-5540 
TE116C 022702 7-S472-7-5480 0-07-5545 
TE1160 022712 7-5462 (7-5471 717-5481 7-5490 07-5549 
E117 022722 07-5565 

TE117A 17-5568 07-5595 

Te 07-5611 

TE120A 023114 17-5617 07-5627 

TE121 023170 07-5649 

TE122 «023554 07-5741 

TE123 024026 07-5819 

TE124 = (024246 67- 

E125. 024500 07-5958 

TE125A 024740 7-591 § 7-5993 47-6031 
E126 025166 07-6124 

TE126A 025234 7-6131  #7-6137 

E1268 025710 17-6226  €7-6265 

| E127 (026226 07-6389 

| TEI2Z7A == 026426 17-6419 07-6451 

| 1E130 =: 026670 07-6555 





CREATED BY MACRO ON 18-OCT-84 AT 16:44 


eeaged 
SESE AM 
SEER 


@7-11666 


@7-5115 


#7-S123 
386-19571 
#7-10879 


#7-10372 
@7-10344 
@7-10352 
@7-10360 
@7-10368 
7-10407 
7-10371 
7-16278 


#7-1149 


#7-11615 


#7-6999 
#7-7002 


#38 -19587 


7-103860 


7-10436 
52-20653 


#7-1149 

7-10787 
#7-11202 
#7-11668 


CREF 


PAGE 37 


vo2 


7-10384 


7-10460 
#62-21531 


*7-10822 
#7-11249 
#7-11710 


J6 


#7-10463 


#7-108692 
#7-11307 
#7-11613 


#7-10923 
#7-11359 
*#7-11909 


#7-10978 
#7-11414 
#7-12005 


#7-11042 
*7-11467 


*#7-12050 


#7-11106 
#7-11525 
#7-12132 





APTOT CREATED BY MACRO ON 18-OCT-84 AT 16:44 PAGE 368 . 
| SEQ 0489 
| SYMBOL CROSS REFERENCE CREF  vo2 
| SYMBOL VALUE REFERENCES 

TSFP26 056122 @7-11708 

TSFP27 056464 @7-11811 

TSFPS @7-10785 

TSFP30 056772 €7-11907 

TSFP31 057302 €7-12003 

TSFP32. 057422 #7-12048 


Tse 052404 7-10760 7-10762 7-10764 7-10766 #7-10771 


055776 

TSF31 057414 7-12007 #7-12035 
TSF6 053210 7-10926 #7-10969 
TSF7 053400 7-10962 #7-11020 
Seaeem 7-1308 

£OSSne 7-1334 

Perr tT) 7-1360 

eOaSER 7-1386 

esaeae 77-1412 

B2SGSH 7-1438 

eeesse 7-1464 

TSLOOP 112072 @27-18551 27-18627 27-18632 
TSA 043076 77-9234 @7-9237 
TSB 043116 7-9239 @7-9242 
TSMC 043126 7-9243 07-9246 


: # 
TTTTTT 8 
g 

33 

on 

Be 





SMMGA 040106 
TSPet68 
TSretec 041304 
TSet6D 
TSM16A 


TSM7 04 SOH4 
TSH 043470 
TSPSWB = ~eeeees 
TSTADO 00 


| TSTLUP 110724 
004724 


20-17651 


7-10351 


@20-17565 
#21-17721 


CREATED BY MACRO ON 16-OCT-84 AT 16:44 


07-9233 
@7-9335 


@32-19091 


7-10944 


#12-16835 
14-17005 


#16-17207 
#17-17276 
01686-17364 
@19-17430 


20-17614 
22-17614 


20-17627 
#22-17623 


SEQ 0490 


58-21193 


APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 40 
SEQ 0491 
SYMBOL CROSS REFERENCE CREF  v02 
SYMBOL VALUE REFERENCES 
TST22 106700 21-17726 21-17752 22-17791 
TST23 107114 22-17796 22-17830 23-17869 
TST26 107452 2353-17694 #24-18011 
TST25 110230 24-18093 25-16109 
TST26 110372 25-18114 #26-162350 
TSsT27 111506 7-1 
TsTS 1 7-16276 7-16300 6-16326 
TST3SO 112630 26 - 18668 
TST31 113002 26-16706 #29-16742 
TST32 113250 29-186793 030-16836 
TST3S3 113570 031-16922 
TST34 113722 @32- 19004 
TSTSS 114306 @33-19125 
TSTS6 114472 33-19130 33-19160 #634-19210 
TST37 115000 34-19214 35-19307 
TST4 102162 = - 
TST40 115146 3535-19311 036-193576 
TST41 115450 36-19362 9037-19459 
TST42 115616 37-19461 37-19465 37-19486 #36-19525 
TsT43 116126 38-19536 38-19585 0359-19604 
TST44 116166 3539-19612 0640-19645 
TST4S 116264 041-19685 
TST46 116346 41-19690 41-19699 6642-19729 
TST47 116562 42-19734 42-19742 0435-19790 
TsTS 102546 9-16427 9-16495 09-16526 
TSTSO 116614 43-1 43-19799 044-19632 
TSTS1 117160 0435-19941 
TSsTS2 117426 45-19945  45-19971 46-20034 
TSTS3 117716 46-20039 46-20041  46-20067 46-20073 #47-20120 
TST54 120134 47-20124 47-20146 #46-20175 
TSTSS 120456 48 -20209 -20256 
TSTS6 121032 49-20258 49-20260 49-20262 49-20319 #49-20345 
TSTS7 121300 0530-20415 
TST6 102732 9-16534 9-16555 #10-16597 
TST60 121452 50- 0531-20468 
TST61 121652 51-20473 51-20480 #52-20535 
TST62) @55-20716 
TST63 123076 S3-20716 5353-20720 054-20796 
TST64 123262 54-20600 54-20602 #55-20651 
TST65 123362 55-20653 35-208655 #56-20669 
TST66 3544 56-20691 057-20961 
TST7 103172 10-16602  10-166355 11-16759 
TS10 O445 38 7-922 77-9533 77-9544 7-9558 07 -9566 
T$1001 053624 7-11047 7-11059 #7-11068 
T$1002 7-11069 7-11056 #7-11092 
T$1004 7-11067 @7-11096 
TSi1 O44 734 7- 7-9603 7-96068 07-9614 
T$1101 053740 7-11109 #7-11129 
TSi2 045372 7-9659 17-9666 7-9673 7-9680 7-9687 7 -9694 @7-9701 
T$14 047114 7-10010 7-10032 #7-10043 
Ts15 7-10210 7-10218 7-10227 #7-10252 
TS16 051004 7-10430 #7-10437 | 


lS 


CREATED BY 


7-10449 


7-11719 
7-11728 
7-11737 
7-11749 
7-11756 
@7-11796 
@7-11874 


@7-12117 


7-7141 


49-20317 
3532-19019 
59-21248 


07-9567 
07-9638 
7-5065 


MACRO ON 16-OCT-84 AT 16:44 


7-11742 
7-11751 
7-11760 
@7-11790 
@7-11794 


#7 -10960 
@7-10964 
@7-9205 

@7-11024 
@7-11026 


2166 
€4-21671 
64-21671 


#7-S093 


N6é 


@7-11778 
#7-11762 


48-20203 
59-212735 
64-21671 


064 -21675 


49-20312 
62-21474 
64-21671 
64-21674 


49-20318 
64 -21664 
64-21671 


| 

| 

SEQ 0492 

| 
59-21226 59-21243 
64-21664  64-21666 
64-21671 64-21671 





—- — - a 


B7 


apToT CREATED BY MACRO ON 16-OCT-64 AT 16:44 PAGE 42 
SYMBOL CROSS REFERENCE CREF vo2 
SYMBOL VALUE REFERENCES 
T116 022572 7-S46S 7-$474 07-5504 7-5515 
TI2FIN 085440 7-9697 07-9717 
T122A 023652 7-$747 7-S758 07-5768 
T 024004 7-5745 © @7-5807 
T123A 024210 7-5624 © 07-5867 
T1238 024220 07-5871 
T123C 024226 07-5874 
T1230 024234 7-5828 07-5877 
T123€ 024236 7-5860 07-5879 
i125 O28242 7-5064 07-5881 
T12@A 024442 7-5891 07-5939 
T1248 024452 07-5943 
T120C 07-5946 
T1240 7-5895 07-5949 
T124€ 024470 7-5932. 07-5951 
020474 7-5936 07-5953 
T15F IN 17-9773 07-9643 
114 047140 7-10028  @7-10048 
Ti4FIN «=: 047512 7-9061 7-10087 7-10070 #7-10160 
115 050050 7-10213 7-10221 7-10230 07-10269 
7-10235 7-10239 7-10243 7-10288 
TISFIN 050154 7-10247  @7-10296 
UDPARO = 177660 05-441 
UDPAR1 = 177662 5-441 
UDPAR2 = 177664 05-441 
UDPARS = 177666 5-441 
UDPARG = 177670 5-441 
UDPARS = 177672 5-441 
 WOPARG = 177674 5-441 
| UDPART = 177676 05-441 
UDPDRO = 177620 5-441 07-6699 07-8931 
| WOPOR1 = 177622 5-441 
UDPOR2 = 177624 05-441 
UDPORS = 177626 5-441 
| UDPOR4 = 177630 5-441 
| UDPORS © 177632 5-441 
UDPORG = 177634 05-441 
UDPORT = 177636 5-441 
UFOFLG 004116 07-1148 07-1148 7-1150 64-21666 
UFDSET »* 000001 05-443 7-1148 64-21666 64-21666 
UIPARO = 177640 05-441 
UIPAR1 = 177642 5-441 
UIPAR2 = 177644 5-441 
| UIPARS = 177646 05-441 
UIPARA = 177650 5-441 
UIPARS = 177652 5-441 
UIPARG = 177654 05-441 
UIPART = 177656 5-441 
UIPORO = 177600 05-441 07-6801 = «7-9045 
VIPOR1 = 177602 5-441 
UIPOR2 » 177604 03-441 
* 177606 05-441 


4 


VALUE REFERENCES 
* 177610 5-441 
e 177612 5-441 
* 177614 5-441 
= 177616 OF - 44) 
30 7-78610 
004120 o7-1148 
2 eeseee -1 
124272 #57-21055 
045730 77-9741 
047342 7-10007 
04 7460 7-9967 
004122 7-1148 
002676 07-927 
002716 07-937 
002700 07-926 
002720 @7-G58 
002672 07-925 
002712 7-935 
1335360 7-13110 
* 177566 07 - SA 
e47-20152 
016670 07-4362 
= 177564 07-965 
042 -19768 
044 -19673 
2045-19963 
46 - 20071 
47-20150 
s essese 7-12733 
017674 07-4726 
017716 07-4741 
© eecece 7-4613 
© esceee 77-4517 
5-453 
s eseseee 64-21667 
136512 64-21667 
1 064 - 21667 
Lea Ta 064 - 21667 
136504 64 - 21846 
001134 5-454 
1254 €S 8548 
001122 
©18-17399 
-16522 
$6-21210 
001126 -434 
$6-21210 
001170 06-454 
001260 €6 -834 
1262 OS - 454 
137264 064 - 21668 


CREATED BY 


MACRO ON 16-OCT-84 AT 


46 - 20078 
047-20157 


e7-1150 


@7-10144 
77-1148 
$3-20754 
$3-20755 


S2-20631 


64 -21671 


64 -21666 


64-21671 
@7-16297 
023-17939 

$6-21192 


22-17631 
047-20136 


64 -21666 


064 -21668 


64-21671 


38-21199 


e32-19049 
47-20138 


64 - 21666 


064 -21668 


62-21518 


#11-16783 
#24 - 186057 
$8-21200 


#40 - 19660 
47-20142 


046 - 
47-20131 


#15-17165 
#24 - 18058 
3$8-21201 


042 -19764 
5386-21198 


#16-17232 
#26 - 18270 


47 -20133 


047-20144 


@17-17314 
#26 -16271 
$8-21209 


046 - 20062 
$8-21208 


a 


CREATED BY 


MACRO ON 16-OCT-84 AT 16:44 


REFERENCES 

064-21671 64-21673 

06-454 7-1149 

06-454 6-454 
-454 6-454 

64-21671 0664-21671 

64-21671 6064-21671 

06-454 

06-454 48-20185 

64-21 64-21668 

64-21670 64-21670 

06-454 

06-454 

06-454 

06-454 

bb -454 

06-454 

06-454 

06-454 

06-454 

06-454 

06-454 

06-454 

06-454 

66-254 

06-454 

86-854 

06 -454 

5-454 

64-21664 64-21664 

64-21670 064-216 

5-452 7-1 
7-1149 0664-21664 

64-21664 6064-21664 

64-21664 6064-21666 

06-454 7-1162 

$7-21055  64-21666 
-454 7-1149 

$1-20478 52-20545 

07-1149  064-21664 

06-454 64-21665 

64-2 

06-454 07-1149 
7-1149 = 77-7433 
Sa 56-21189 

$8-21197 5686-21198 
58-2 58-2 

64-2 

07-454 59-21240 

06-454 064 -21666 

06-454 07-1149 

06-454 

5-453 06-454 


64-21673 
77-1149 


6-454 


39-21226 
64 -21663 
064 -21670 


64 -21666 
064 -21665 


ee ee 


3539-21245 
64-21671 


64 -21666 


41-19687 
64-21667 


7-1149 
6-454 


3$9-21250 
64-21671 


64 -21666 


42-19731 
668 


668 
$7-20971 
064 - 21665 
64 -21665 


7-1149 
6-454 


7-1149 


06-454. 


7-1149 


SEQ 0495 


39-21254 64-21666 64-21666  64-21666 


64-21671 


45-19942 


37-20974 
64-21665 
64-21665 
38-21193 
$8-21202 
064 - 21666 


64 -21666 


47-20121 


$7-21053 
64 -21665 


48 -20182 


064 - 21664 
#64 -21666 


$86-21195 
38 -21204 
64 -21666 


49-20261 


64 - 21666 


$8-21196 
$8-21205 
64 -21666 


me ee ee + —— ee ee ee ee ‘deanna, 


E7 | 


CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 45 


SEQ 0496 
SYMBOL CROSS REFERENCE CREF  v02 
VALUE REFERENCES 

001202 06-454 064 -2166 

136732 64-21667 *64-21667  64-21667 %64-21667 64-21667 

001156 06-4 64-21668 64-21668  64-21666 

001155 06-454 64-21668  64-21668 

001120 06 - 454 

001124 66-454 ©9-16436 ©10-16626 12-16642 %17-17320 %16-17406 %20-17586 %20-17606 *20-17617 


20-17634 ©20-17644 26-18681 °26-18682 %26-186935 2686-16694 %26-18704 %29-186749 +*29-18752 
@29-18757 29-16768 29-16776 *29-18762 %34-19254 3534-19266 *35-193519 *35-19324 +*36-19391 
©36-19396 >. ppl ©42-19767 “ eoy 44 ©49-20392 56-21191  56-21193 5686-21194 5686-21197 


$8-21202 - 58-21204 - 58 -21206 

135536 64-21664 864-21 
140012 064-21671 64-21673 64-21673 
000001 5-436 5-4 - 
000232 05-453 
140626 064-21672 064-21672 
002104 06-454 ©64-21665  64-21665 °%64-21665  64-21665 64-21665 
141052 64-21674  64-21674 064-21674 
001135 06-4354 64-21671  64-21671 64-21671 
001114 06-454 359-21229 2964-21666 64-21666  64-21666  64-21666 
001176 06-454 64-21666 64-21666 64-21666  64-21668 64-21671 64-21671  64-21671 
136731 064-21667 064-21667 
001106 06-454 e7-1149 ©64-21665 2964-21665  64-21665 64-21665 64-21665 
001110 06-454 e7-1149 64-21665 2%64-21665  64-21665  64-21665 64-21666 
001232 66 - 454 
001236 06-454 
001242 06-454 
001246 06 - 454 

1200 5-453 5-453 06 -454 7-1149 7-1162 64-21665 64-21666 64-21668 
001230 06-454 
001234 06-454 
001240 6-454 
001244 $6 - 454 
000234 05-453 
136730 064-21667  64-21667 %64-21667 0664-21667 
140515 64-21671 €64-21671 
001214 06 - 454 064-21667  64-21667 
001216 06-454 064 -21667 
001200 06 -454 64-21667 °64-21667  64-21667 %64-21667 
140504 64-21671 €64-21671 
001231 06-454 

35 06 - 454 
001241 06-454 
001245 06-454 
136102 64-21665  64-21665  64-21665 64-21665 
001154 06-454 64-21668 64-21668  64-216686 
000000 07-1195 67- - os @9-16526 10-16597 11-16739 12-16833 1535-16916 


16270 -16422 1 
@14-17005 sy #16-17207 y+ Mi Ba be @16-17364 @19-17430 @20-17565 21-17721 #22-17791 


@27- 26 - 18668 
@32-19004 4335-19125 0354-19210 ©35-19307 036-19378 037-19459 0386-19525 05359-19604 #40-19645 
041-19685 €42-19729 @435-19790 €44-19632 0645-19941 0646-20034 
049-20343 @50-20415 @51-20468 052-20535 0535-20716 @54-20798 #55-20851 #56-20889 #57-20961 


137512 





CREATED BY MACRO ON 16-OCT-84 AT 16:44 


SYMBOL VALUE 
$OMODE 137514 
sOVER 136060 
$PASS 001206 
sPASTM 
$POQ-TR 141060 
$Pi< ON 140712 
SPUuRNG 141046 
$PURUP 140764 
sQUES 001174 
¢$ROCHR 
SRDDEC = eeeeee 
$RDLIN 140354 
$RDOCT 1 
sRDSZ = 000010 
$RTRAD 135560 
s eseses 
SSAVRE = eeeses 
$SAVRE 141056 
$SCOPE 135602 
SSETUP = 000137 
$STUP = 177777 
$SVLAD 136024 
$SVPC = 000232 
$SkR = 167400 
SSWPEG 001222 
sSiarxk =6= 0003500 
sTESTN 001204 
sTIMES 001164 
$TKB 001146 
$TKS 001144 


06-454 


3532-19069 
064 -21674 


064-21674 


64-21671 


64-21674 
) 


1 
64-21668 


46 - 20040 
64-21665 


64-21674 
64-21674 


64 -21666 
64-21673 


64-21673 
64-21673 


064 -21674 


@7-1148 
77-1148 
7-1149 
64 -21664 


F7 


PAGE 46 


CREF  v02 


64 -21665 
064 -21674 


64-21668 


064 -21674 


7-1148 
07-1148 
7-1149 © 
64-21665 


07-1146 
@7-1148 


5-437 
64-21665 


#64 -21665 
64 -21668 


64 -21668 


64 -21668 


064 -21674 


#7-1148 
7-1149 
7-1149 
64 -21666 


@7-1148 
#7-1146 


5-437 
64-21665 


64-21665 
64-21668 


64 -21668 


ee ee ee ee ee ee ee Oe 


64 -21669 


37-19460 
49-20259 


64-21671 


#64 -21665 
64-21671 


64-21671 


41-19689 


42-19733 


SEQ 0497 


43-19791 


64-21664 *64-21664  64-21664 


64 -21671 


#7-1148 
7-1149 
7-1149 
64 -21666 


@7-1148 
#7-1148 


5-437 
64-21665 


64-21665 
64-21671 


64-21671 


64-21671 


7-1148 
7-1149 


#7-1148 
@7-1148 


64-21665 
64-21671 


64-21671 


64-21671 


97-1148 


7-1149 
7-1162 
64-21671 


64-21671 
64-21671 





, STHPO 


APTOT 


SYMBOL CROSS REFERENCE 
SYMBOL 


sTMP1 


$TN 


CREATED BY 


VALUE 


001160 


001162 


REFERENCES 
64-21671 
-486 


06-454 
64-21665 


MACRO ON 18-OCT-84 AT 


64-21671 
05-449 


64-21673 
064 -21673 


59-21225 
64 -21666 


16:44 


64-21671 


64-21675 


264 - 21664 
64 -21666 


CREF 


oe 


G7 


PAGE 47 


vo2 


23-17917 


64-21673 
64-21675 
64-21675 
064 -21675 
64-21675 
64-21675 


64 -21665 
64 -21666 


23-17918 
6846 


#15-17110 
17-17276 


64-21675 


64-21665 


€64-21675 


#64 -21665 





CREATED BY 


64-21671 
73 


64-21667 
05-453 


64-21671 
64-21675 
1668 


064 - 21669 
64-21675 


7-1167 


64-21668 
64-21668 


64-21664 
064 - 21669 
64 -21666 
64-21667 
5-453 


-H7 


MACRO ON 18-OCT-84 AT 16:44 PAGE 48 


CREF  vO02 


64-21671 064-21671 

64-21673 

64-21673 64-21673 

64-21668 064-216668  64-21671 
064 -21668 


64-21673 
64-21673 


64-21671 


64-21669 064-21669 


SEQ 0499 


17 





APTOT CREATED BY MACRO ON 18-OCT-84 AT 16:44 PAGE 49 
SEQ 0500 

MACRO CROSS REFERENCE CREF vo2 

| MACRO NAME REFERENCES 

| 

ADOPHS #7-9846 07-9847 77-9856 

CBITHS e7-a384 07-4385 7-4595 

DATAOL #7-2877 © @7-2878 
05-442 

ESCAPE 05-442 

FPPMS #7-10479 @7-10480 ©=-7-10492 

FPPONS #7-10626 @7-10627 —7-10637 

GETPRI 05-442 

GETSUR @5-442 07-1162 7-1162 

HAL TMS #7-5603 07-5604 

MEPTHS €7-5559  @7-5560 

rents 13 7-9721 07-9722 = 7-9729 

reets14 07-9953 07-9954 —-- 7-961 

MULT ~442 

NEWTST 7-11 7-16270 8- 9-16422 9- 10-16597  11-16739 12-16833 13-16918 
14-17005 15-17110 16-17207 17-17276 18-17364 19-17430 20-17565 21-17721  22-17791 23-17889 
24-18011 25-18109 26-16230 27-18483 28-18668 29-16742 30-18836 31-18922 32-19008 33-19125 
34-19210 35-19307 36-19378 37-19459 38-19525 39-19604 40-19645 41-19685 42-19729  43-19790 
44-1 45-19941 46-20034 47-20120 48-20175 49-20256 49-20343 S0-20615 51-2068 52-20535 
S3-20716 54-20798 55-20851 56- 57-20961 

NHS #7-10164 @7-10165 —7-10175 

ODDAMS @7-7701 87-7702 = 7-710 

PIRMS2 07-7846 © 07-7847 = 77-7857 

PIRNSS 07-7886 © 07-7887 = 77-7895 

PIRNSS €7-7923 07-7924 = 77-7933 

PIRNSS €7-7953 07-7954 =—-7-7968 

PIREMS @7-8030 07-8031  7-8046 

POP -442 64-21667 64-21667 64-21670 64-21672 64-21674 64-21674 

PREBUT 07-3485 07-3486 7-3498=— 77-3498 7-3498— 7-498? 7-3498 0-7-3098: 7-3498 
7-3498 «=«-«7-3498— ss 7-3496=—s«7-3498=— 77-3498 = 7-3498—7-3498—7-3498—7-3498— 7--3498 
7-3498 4«=«--«7-3498=—s«7-3498=— 77-3498 = 7-34968=—s 77-3498 7-3498—7-3498 = 7-3498 07-3498 
7-3496 = «77-3498 =—7-3498 == 7-3498 

PUSH 3-442 64-21667 64-21667 64-21667 64-21670 64-21672 64-21674 €4-21674 

SAVENT 07-1148 = 7-1148 

SETTRA OG4-2167S  GA-2167364-2167S  G4-21673 64-21673 64-2167 G4-2167S  G4-21673 64-21673  64-21675 

| ~442 7-1149 

SKIP 5-432 7- 7-16300. 8-16333_ 9-16427 9- 10- 16602 
10-16633 11-16744 11-16780 12-16638 13-16923 13-16965 14-17010 1S-17115 15-17162 16-17212 
16-17229 17-17261 17-17308 18-17369 18-17394 19-17435 20-17651 21-1 21-1 22-17796 
22-17630 23-17694 24-18093 25-18114 28-18706 16793 33-19130 3$3-19160 34-19214 35-1931 
36-19362 37-19461 37-1 37-19466 38-19536 36-19585 39-19612 41-19690 41-19699 42-19734 
42-19742 43-19792 43-19799 45-19945 45-19971 46-20039 46-2004: 46-20067 46-2007" 47-20124 
47-20146 48-20209 49-20258 49-20260 49-20262 49-20319 50-20420 51-20673 51-20480 53-20718 
53-20720 4-20800 S4-20802 S5-20853 55-20855 56-20691 

| SLASH 5-442 

SOP1MS €7-1518 07-1519 —-7-1528 

STARS -442 5-452 

| 

| 


J7 


APTOT CREATED BY MACRO ON 16-OCT-64 AT 16:44 PAGE SC 
SEQ 0501 

| MACRO CROSS REFERENCE CREF v02 

| MACRO NAME REFERENCES 

7-8046 77-9729 7-98656 7-9961 7-101 7-10492 7-10637 7-16270 8-1632 9-16422 

9-16526 10-16597 11-16739 12-1 13-16918 4-17005 15-17110 16-17207 17-17276 1686-17364 
19-17430 “17565 21-17721 22-17791  23-17889 24-18011 25-16109 26-16230 27-18463 26-16668 
29-186742 30-16636 31-18922 32-1 33-19125  34-19210 3535-19307 36-19378 37-19459 3686-19525 
39-19604 40-19645 41-196865 42-19729 43-19790 44-19632 45-19941  46-20034 47-20120 4868-20175 

49-20256 49-20343 50-20415 5351-20466 -205 $3-20716 5354-20796 55-20651  56-206869 57-20961 
64-21664 64-21665 64-21 64-21667 64-21668 64-21669 64-21670 64-21671 64-21671 64-21671 
64-21671 64-21672 64-21673 64-21674  64-21674 

SWRSU - 07-1149 7-1149 

SXTMSG @7-4556 @7-4557 7-4567 

TCC1IMS @7-4097 07-4098 7-4106 

TRMTRE €64-21673 

TSOLMS e7- #7-1205 7-1213 

TSO2MS @7-1234 #7-1235 7-1243 

TYPBIN 65-442 

TYPDEC #5-442 64-21664 

TYPNAM @S-442 7-1162 

TYPNUM #5-442 

TYPOCS #5 -442 

TYPOCT 5-442 64-21671 

TYPTXT ~ 442 

SABORT 064-21666  64-21666 

$ $CMRE #5-454 

$$ChTM 05-454 6-454 6-454 

$$ESCA -442 

$$NEWT 05-442 7- 7-16270 8-16326 9-16422 9-16528 10-16597 11-16739 12-1 13-16918 
14-17005 15-17110 16-17207 17-17276 1686-17364 19-17430 20-17565 21-17721 22-17791 23-17869 
24-16011 25-18109 -1 27-1864835 26-186668 29-186742 30-18836 31-1 32-19004 33-19125 
34-19210 35-19307 36-19378 37-19459 36-19525 3539-19604 40-19645 41-196865 42-19729 43-19790 
aA) 45-19941 4- 47-20120 4868-20175  49-20256 49-20343 50-20415 51-20468 52-20535 
$3-20716 54-20796 55-20651 5%6- 57-20961 

$$SET ot rt | 64-21673 64-21675 64-21673 64-21673 64-21673 64-21673 64-21673 64-21673 64-21675 

$$SETM #7-1149 7-1149 

$$SKIP 7-16276 7-16300 6-16333 9-16427 9-16495 9-16534 9-16555 10-16602 10-16635 
11-16744 1131-16780 12-16836 13-16923 13-16965 14-17010 15-17115 15-17162 16-17212 16-17229 
17-17261 17-17308 1686-17369 16-17394 19-17435 20-17651 21-17726 21-17752 22-17796 22-17850 
23-17894  24-18093 25-16114 26-16706 29-18793 33-19130 3353-19160 34-19214 35-19311 36-19562 
3537-19461 37-19465 537-1 386-19536 -1 39-19612 41-19690 41-19699 42-19734 42-19742 
43-19792 43-19799 45-19945 45-19971 46-20039 - 1 46-20067 46-20073 47-20124 47-20146 
486-20209 49- 49-20260  49-20262 49-20319 50-20420 51-20473 51-20480 53-20718 535-20720 
54-20600 S4- $5-20653 55-20855 56-20691 

-EQUAT #5-429 5-442 

-HEADE #5-429 5-436 

-KT1i1 #5-432 5-441 

- SETUP #5-429 77-1148 

° #5-429 5-437 

. 05-429 5-437 5-436 

- $ACT1 05-428 5-452 

- $APTB #5-426 06 -454 6-454 

. SAPTH #5-428 5-453 

- SAPTY 05-428 64-21667 








APTOT CREATED BY MACRO ON 16-OCT-84 AT 16:44 PAGE 51 
MACRO CROSS REFERENCE CREF v02 
MACRO NAME REFERENCES 

. SCATC #5-429 5-444 

. SCHTA @5-430 5-454 

. SEOP #5-430 64-21664 

. SERRO #5-430 64 -21666 

. T #5-430 

. SPOWE #5-431 64-21674 

. $RDOC #5-431 64-21672 

. $READ #5-431 64-21671 

. SSAVE #5-431 

. $SCOP @5-430 64-21665 

. $SIZE #5-432 


. STRAP #5-431 64-21673 





